Получение нулевого значения при использовании Dlookup

Question

Я не эксперт в доступе, но пытаюсь что-то сделать с Dlookup, но не уверен, почему я получаю ошибку времени выполнения 3464

Мое требование для получения подробной информации о плате за обслуживание, если я ввожу значение мощности двигателя в текстовом поле и тип услуги в поле со списком. Я должен получить стоимость услуг в тексте любезно помочь. Здесь я прилагаю скриншот таблицы, базы данных и dlookup

Dim val As Double
Dim sert As String
Dim engp As Double

sert = Me.Service_Type.Value
engp = Me.Engine_Power.Value

val = DLookup("Ser_charge", "Service_Charges", "Service_Type='sert' AND Engine_power = 'engp'")

из таблицы Service_charges

Answer 1

Вам необходимо объединить значения в строку поиска:

val = DLookup("ser_charge", "service_charges", "Service_Type='" & sert & "' AND Engine_Power=" & engp)

Предполагается, что Service_type - это строка, поэтому для переноса переменной используются одинарные кавычки, а engine_power цифра c, поэтому вам не нужно переносить переменную.

С уважением,

Answer 2

Вы должны объединить значения переменных, первое как текст, второе как число:

val = DLookup("Ser_charge", "Service_Charges", "Service_Type='" & sert & "' AND Engine_power = " & engp & "")

И dim val как Валюта . Всегда используйте валюту для сумм и т. П.

Answer 3

Использовали ли вы функцию Nz, чтобы возвратить нулевое значение в 0, например:

val = Nz(DLookup("Ser_charge", "Service_Charges", "Service_Type='" & sert & "' AND Engine_power = " & engp ),0)

Это может решить вашу проблему. Также обратите внимание на удаление строковых кавычек "", когда вы имеете дело с числом.