主题：请教关于控件中,字符自动输入的问题

'ValueChanged事件代码
Dim dr As DataRow
dr = DataTables("表A").Find("第一列 = '" & e.Sender.Value & "'" )  
If dr IsNot Nothing '如果找到, 则设置各列内容
    e.Form.Controls("TextBox2").value = dr("第二列")
End If