我定义两个变量,问题终于解决了
查询定义为:vars("模式") = "查询"
加载全部定义为:vars("模式") = "加载全部"
If vars("模式") = "查询" Then e.Form.Controls("button6").Enabled = False If vars("模式") = "加载全部" Then e.Form.Controls("button6").Enabled = True End IfEnd If