نمایش فیلد جدولی در فرم مربوط به جدول دیگر

[رضا نانوا]

با سلام
در فرم مربوط به مشخصات مشتری (در یک برنامه حسابداری) که با جدولی از بانک اطلاعاتی در ارتباط است میخواهیم با وارد کردن کد مشتری بقیه مشخصات وی ظاهر شود که این کار با نوشتن کد زیر قابل اجرا است:


Dim ds AsNew DataSet
Dim SqlStr AsString = ""
If ID_TextBox.Text.Length <> 0 Then
SqlStr = "IDcustomers LIKE '" + ID_TextBox.Text + "'"
Try
mConnection.Open()
mAdapter = New OleDb.OleDbDataAdapter("SELECT * FROM Customers Where(" + SqlStr + ")", mConnection)
mAdapter.Fill(ds, "Chap")
If ds.Tables("Chap").Rows.Count = 1 Then
ID_TextBox.DataBindings.Clear()
OffDate_TextBox.DataBindings.Clear()
Debt_TextBox.DataBindings.Clear()
Name_TextBox.DataBindings.Clear()
Family_TextBox.DataBindings.Clear()
Adress_TextBox.DataBindings.Clear()
TelHome_TextBox.DataBindings.Clear()
Mobile_TextBox.DataBindings.Clear()
Have_RadioButton.DataBindings.Clear()
DontHave_RadioButton.DataBindings.Clear()
Description_TextBox.DataBindings.Clear()
Always_RadioButton.DataBindings.Clear()
NoAlways_RadioButton.DataBindings.Clear()
ID_TextBox.DataBindings.Add("Text", ds, "Chap.IDcustomers")
Name_TextBox.DataBindings.Add("Text", ds, "Chap.Name")
Family_TextBox.DataBindings.Add("Text", ds, "Chap.Family")
Adress_TextBox.DataBindings.Add("Text", ds, "Chap.Adress")
TelHome_TextBox.DataBindings.Add("Text", ds, "Chap.TelHome")
Mobile_TextBox.DataBindings.Add("Text", ds, "Chap.Mobile")
Have_RadioButton.DataBindings.Add("Checked", ds, "Chap.Have")
DontHave_RadioButton.DataBindings.Add("Checked", ds, "Chap.DontHave")
Description_TextBox.DataBindings.Add("Text", ds, "Chap.Description")
Always_RadioButton.DataBindings.Add("Checked", ds, "Chap.Always")
NoAlways_RadioButton.DataBindings.Add("Checked", ds, "Chap.NoAlways")



مشکل اینجاست که میخواهیم مبلغ بدهی وی را که از جدول دیگری میباشد در textBoxدیگری نمایش دهد ، نیاز به راهنمایی شما عزیزان دارم . متشکرم

[gdevnb]

داخل دیتاست چندین table می تونی داشته باشی. خوب اون table رو هم به دیتاستت اضافه کن مشکلت حل میشه