منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

بسم الله

اريد ربط هذه الاداء بقاعد بيانات اكسس باستخدام الكود وربطها بجدول وحقل
كما في المثال المرفق


ارجو المساعدة

الحمدلله اخوي لو ممكن تبحث في قسم الامثلة برامج وامثلة كثيرة بخصوص طلبك هذا

وجواب سهل جدا
تسوي Form1 جديد وتدخل في لود للفورم
وتكتب مثلا loadid فقط

بعدها تسوي combo1 وتسمية TxTlName بعدا تغير بيانات DataSet مثل لي معك وConn و SQLTvcustomer
لزم تغير بحسب المطلوب ضروري عشان يشتغل صح

استدعاء Dataset و Sql
Dim DataSetTTvcustomer As New DataSet
Dim SQLTvcustomer As String = "Select * from Expensestype"


public sub : للستدعاء عند فتح الفورم مباشره

Sub loadid()

DataSetTTvcustomer.Clear()
' DataSetTTStaff.Clear()
Conn.Open()
Dim DataAdapterTstaff As New OleDbDataAdapter(SQLTvcustomer, Conn)
DataAdapterTstaff.Fill(DataSetTTvcustomer, "Expensestype")
Conn.Close()




TxTlName.DataSource = DataSetTTvcustomer.Tables(0)
TxTlName.ValueMember = "subject"
TxTlName.DisplayMember = "subject"

End Sub