textchanged事件控制,如
If e.sender.text = "死亡" then
e.form.controls("textbox1").enabled = False
e.form.controls("textbox2").visible = False
End If