Dlookup не работает(

@KirillV · Регистрация: 29.06.2013

Студворк — интернет-сервис помощи студентам

Добрый день!

Помогите, пж, с проблемой
Пытаюсь написать Dlookup, но почему то не работает.
Ранее, на подобном примере уже писал его, все работало, а сейчас нет…

Нужно чтобы при выборе SKU в форме «9999_plan_by_SKU subform», автоматически из справочника directory_SKU подтягивалась его цена… а она почему-то. Не тянется… в чем может быть дело?

@Eugene-LS · 19.11.2018, 12:54

Сообщение от KirillV

Нужно чтобы при выборе SKU в форме «9999_plan_by_SKU subform», автоматически из справочника directory_SKU подтягивалась его цена… а она почему-то. Не тянется… в чем может быть дело?

Было с употреблением необявленной переменной (= Null):

Visual Basic
1
Цена = DLookup("Price", "directory_SKU", "Code_SKU=" & SKU_for_base

Лучше так:

Visual Basic
1
2
3
4
5
6
7
Private Sub SKU_AfterUpdate()
    If Me!SKU.ListIndex > -1 Then 'Знач выбрано
        Me!Цена = DLookup("Price", "directory_SKU", "Code_SKU=" & Me!SKU)
    Else
        Me!Цена = 0
    End If
End Sub

Про Option Explicit - вам разве не говорили ещё?

@KirillV · 19.11.2018, 13:00 **[ТС]**

Сообщение от Eugene-LS

Про Option Explicit - вам разве не говорили ещё?

я самоучка))) мне НЕ ТО ЧТОБЫ не говорили)) я даже понятия на имею, чтобы бы это значило)))

сейчас попробую в основную базу вставить)

@Eugene-LS · 19.11.2018, 13:07

Сообщение от KirillV

я самоучка)))

Это, думаю, лучший вариант познания.

Добавлено через 3 минуты

Сообщение от KirillV

я даже понятия на имею, чтобы бы это значило

Сделайте настроечку как на картинке + вверху каждого существующего модуля добавьте строку, дабы было так:

Visual Basic
1
2
Option Compare Database
Option Explicit

@Eugene-LS · 19.11.2018, 13:15

KirillV, + выведите на панель инструментов кнопку Compile и почаще на неё нажимайте ...

@KirillV · 19.11.2018, 13:18 **[ТС]**

Всем Спасибо!))

@pagpal · 19.11.2018, 13:23

Сообщение от KirillV

Пытаюсь написать Dlookup

А зачем вообще использовать Dlookup в данном случае. Не проще ли так:

Visual Basic
1
2
3
Private Sub SKU_AfterUpdate()
Me.[Цена] = Me.SKU.Column(2)
End Sub

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@Eugene-LS 12065 / 5848 / 1494 Регистрация: 05.10.2016 Сообщений: 16,436
	19.11.2018, 13:15
	KirillV, + выведите на панель инструментов кнопку Compile и почаще на неё нажимайте ... Миниатюры 1

@KirillV 1 / 1 / 0 Регистрация: 29.06.2013 Сообщений: 100
	19.11.2018, 13:18 [ТС]
	Всем Спасибо!)) 0

Dlookup не работает(

Решение