کمک برای ساخت دفترچه تلفن [بایگانی]

mosafer1375

شنبه 25 اردیبهشت 1389, 22:07 عصر

با سلام
من می خوام یه دفترچه تلفن ساده درست کنم
درخواستم اینه که می خوام یه جستجو توی فرم براش بزارم که وقتی هر حرفی که ممکنه توی بانک به عنوان نام ذخیره شده رو تایپ کرد شماره تلفن پیدا بشه و روی فرم به نمایش در بیاد

amirzazadeh

یک شنبه 26 اردیبهشت 1389, 11:09 صبح

با سلام
من می خوام یه دفترچه تلفن ساده درست کنم
درخواستم اینه که می خوام یه جستجو توی فرم براش بزارم که وقتی هر حرفی که ممکنه توی بانک به عنوان نام ذخیره شده رو تایپ کرد شماره تلفن پیدا بشه و روی فرم به نمایش در بیاد

سلام
شما ميتونين از دستور dlookup براي اين منظور استفاده كنيد:

Private Sub Text4_Change()
Dim x As Variant
Me.Text9 = DLookup("[tel]", "table1", "[name]='" & Me!Text4 & "'")
End Sub
..................................
موفق باشيد

mosafer1375

دوشنبه 27 اردیبهشت 1389, 09:22 صبح

سلام
شما ميتونين از دستور dlookup براي اين منظور استفاده كنيد:

Private Sub Text4_Change()
Dim x As Variant
Me.Text9 = DLookup("[tel]", "table1", "[name]='" & Me!Text4 & "'")
End Sub..................................
موفق باشيد

میشه این کد رو روی نمونه خودم پیاده کنید ممنون میشم

amirzazadeh

دوشنبه 27 اردیبهشت 1389, 11:35 صبح

میشه این کد رو روی نمونه خودم پیاده کنید ممنون میشم
سلام
فايل ضميمه رو ببينيد.
.....................
موفق باشيد