此主题相关图片如下:1.jpg
我想在会员编号中输入“会员编号”,然后点选定后,姓名、姓别、年龄、联系电话能够自动从会员表填充进来,以下是我写的,请高手们看看,问题出在哪里
Dim txt As String = e.Form.Controls("TextBox1").Value
If txt = "" Then
Return
End If
Dim flt As String
If IsNumeric(txt) Then
If txt.Length <> 5 Then
messagebox.show("请输入正确的五位数编号")
Return
Else
Dim f As New Filler
f.SourceTable = DataTables("会员表")
f.SourceCols = "会员姓名,性别,年龄,联系电话"
f.DataTable = DataTables("会员见面表")
f.DataCols = "姓名,性别,年龄,联系电话"
If flt = "会员编号 = '" & txt & "'" Then
f.Fill()
End If
End If
End If