主题：帮忙修改一下代码

我想在窗口的一个文本框中输入会员编号，点击按纽后姓名、姓别、年龄等能够自动从会员表中填充到窗口的其它几个文本框中，我写的这个肯定不对，帮忙修改一下

Dim wybh As WinForm.TextBox = e.Form.Controls("TextBox1").Text
If DataTables("会员表").DataRows("会员编号") = wybh Then
   
    Dim f As New Filler
    f.SourceTable = DataTables("会员表") 
    f.SourceCols = "会员姓名,性别,年龄,联系电话”
    f.DataTable = DataTables("会员见面表") 
    f.DataCols = "姓名,姓别,年龄,联系电话" 
    f.Fill() '填充
End If

此主题相关图片如下：1.jpg

If DataTables("会员表").DataRows("会员编号") = wybh Then

这句问题不少

就是这句的问题了，哥们，帮一下

Dim wybh As string = e.Form.Controls("TextBox1").Text
If Tables("会员表").Current("会员编号") = wybh Then   
    Dim f As New Filler
    f.SourceTable = DataTables("会员表") 
    f.SourceCols = "会员姓名,性别,年龄,联系电话”
    f.DataTable = DataTables("会员见面表") 
    f.DataCols = "姓名,性别,年龄,联系电话" 
    f.Fill() '填充
End If

cmd.commandtext="select 姓名,姓别,年龄 from {会员表} where 会员编号='" & e.form.controls("会员编号").text & "'"

dim dt as datatable=cmd.ExecuteReader()

if dt.datarows.count=1

dim dr as datarow=dt.datarows(0)

e.form.controls("姓名").text=dr("姓名")

end if

还是第二句有问题

六楼的朋友写的这个也不行
此主题相关图片如下：2.jpg

dim cmd as new sqlcommand