ارید استخدام دالە dlookup للارقام و للنص

[kajin.tha60]

هذه الدوال يستخدم للارقام فقط اريد استخدامها للارقام و اللنص ... 

 

 

dlookup.accdb

تم تعديل ديسمبر 27, 2021 بواسطه kajin.tha60

[محمد أبوعبدالله]

تفضل اخي الكريم

رقم
DLookup = DLookup("My_Filde", "My_Table", "My_Filde1 =" & myWhere)

نص
DLookup = DLookup("My_Filde", "My_Table", "My_Filde1 ='" & myWhere & "'") 

تاريخ
DLookup = DLookup("My_Filde", "My_Table", "My_Filde1 = #" & myWhere & "#")

تحياتي

[ابو جودي]

وطبعا لا ننسى الاعلان عن المتغير تبعا للنوع المطلوب مع الحاق القيم التى تريدها اليها 

رقم'
Dim myWhere As Integer
myWhere = 1
DLookup = DLookup("My_Filde", "My_Table", "My_Filde1 =" & myWhere)
'--------------

نص'
Dim myWhere As String
myWhere = "محمد أبوعبدالله"
DLookup = DLookup("My_Filde", "My_Table", "My_Filde1 ='" & myWhere & "'") 
'--------------

تاريخ'
Dim myWhere As Date
myWhere = #1/1/2021#
DLookup = DLookup("My_Filde", "My_Table", "My_Filde1 = #" & myWhere & "#")