主题：如何实现，下述目的，谢谢

Dim TT As  String

TT = e.Form.Controls("TextBox4").Value

if TT = "无" then   

  Dim cma As WinForm.TextBox = e.Form.Controls("TextBox2")

cma.value=""

Dim cmb As WinForm. TextBox = e.Form.Controls("TextBox3")

cmb.value=""

Dim cmc As WinForm. TextBox = e.Form.Controls("TextBox4")

cmb.value=""

ELSE

Return       '终止代码的执行

end if

 

在“单位基本录入”表中的“单位基本信息录入”窗口想实现如下的目的：
1、在“单位名称”中选择“无”时（或者选择空格时），录入的单位地址、单位负责人及单位名称中的“无”自动清空，并保存