文本框textchanged事件
If e.sender.text = "" Then
e.form.controls("CheckBox1").Checked = False
Else
e.form.controls("CheckBox1").Checked = True
End If
复选框checkedChanged事件
If e.sender.Checked Then
e.sender.backcolor = color.Green
e.sender.backcolor = color.Red
加好友 
发短信
Post By：2018/6/6 17:17:00 [显示全部帖子]
