PDA

View Full Version : سوال: نمایش در تیبل



aminvb
یک شنبه 13 دی 1388, 22:27 عصر
سلام آقا از چه کدی استفاده کنم که بتونم هنگامی که در تکست باکس عددی رو وارد می کنم اگه اون عدد مساوی با فیلد کد در دیتا بیسم بود فیلد های دیگه از قبیل نام و سن و .... رو بتونم داخل لیبل هام نمایش بدم
دوستان ممنون:لبخندساده:

aminvb
دوشنبه 14 دی 1388, 22:04 عصر
دوستان کمک لطفا خیلی فوریه

rasoul2023
سه شنبه 15 دی 1388, 00:21 صبح
توی رویداد TextChanged بنویس :


Dim con As New OleDbConnection( YOUR CONNECTION STRING )
Dim str As String = "SELECT * FROM tablename WERE Fildname =" & Textbox.text
Dim cmd As New OledbCommand(str,con)
Dim dr as OledbDatareader
con.open()
dr=cmd.executereader
while dr.Read
lblname.Teat = dr("Fildname")
lblfamili.Text=dr("FildFamili")
.
.
.
End While
con.close()

موفق باشید . VS در دسترس نبود کدها را با دست نوشتم اگه خطا داشت مطمئن باشید املایی هستش . توی دستور SELECT هم چون گفته بودی عددی را وارد کنم سینگل کوتیش نذاشتم اگه خواستی متن وارد کنی مثل کد زیر بنویس :



"SELECT * FROM tablename WERE Fildname ='" & Textbox.text & "'"