以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  操作顺序  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=98958)

--  作者:longyanlin
--  发布时间:2017/4/10 13:43:00
--  操作顺序
一个窗口中有ComboBox1ComboBox2ComboBox3ComboBox4等四个控件,当以上4个都不为空的时候,Button1Button2,才可以使用,请教代码如何写图片点击可在新窗口打开查看
--  作者:有点色
--  发布时间:2017/4/10 14:19:00
--  

 你可以在 Button1 和 Button2 写判断代码,如

 

If e.Form.Controls("ComboBox1").text > "" AndAlso e.Form.Controls("ComboBox2").text > "" Then

    \'执行代码

Else

    msgbox("不能使用")

End If


--  作者:有点色
--  发布时间:2017/4/10 14:21:00
--  

 或者在 combobox 的textChanged事件写代码,如代码

 

If e.Form.Controls("ComboBox1").text > "" AndAlso e.Form.Controls("ComboBox2").text > "" Then

    e.Form.Controls("Button1").Enabled = True

    e.Form.Controls("Button2").Enabled = True

Else

    e.Form.Controls("Button1").Enabled = False

    e.Form.Controls("Button2").Enabled = False

End If


--  作者:longyanlin
--  发布时间:2017/4/10 14:38:00
--  

谢谢色色老师,还是您最好图片点击可在新窗口打开查看