以下是引用杰克在2017/5/24 23:03:00的发言：单击取消按钮，取消查到的内容外，TextBox1输入的内容也应该清除掉，咋写代码？
[此贴子已经被作者于2017/5/24 23:07:49编辑过]
方法一：你不要绑定表，改成赋值的方式。
Dim xh As WinForm.TextBox = e.Forms.Controls("TextBox1")
Dim dr As DataRow = DataTables("班级成绩表").Find("姓名 like '%" & xh & "%' or Convert(学号, 'System.String') like '%" & xh & "%'")
Dim xm As WinForm.TextBox = e.Forms.Controls("TextBox5")
Dim bj As WinForm.TextBox = e.Forms.Controls("TextBox4")
xm.Value = dr("姓名")
bj.Value = dr("班级")
取消的时候，把值赋值为空白
Dim xm As WinForm.TextBox = e.Forms.Controls("TextBox5")
Dim bj As WinForm.TextBox = e.Forms.Controls("TextBox4")
xm.Value = Nothing
bj.Value = nothing
方法二：这样写
Tables("班级成绩表").Filter = "1=2"
[此贴子已经被作者于2017/5/24 23:14:14编辑过]
加好友 
发短信
Post By：2017/5/24 22:01:00 [显示全部帖子]
