以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [讨论]关于逻辑按钮控制编辑,谢谢  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=62437)

--  作者:as2517
--  发布时间:2014/12/31 22:08:00
--  [讨论]关于逻辑按钮控制编辑,谢谢
这段代码需要修改那个地方啊或有别的好代码。谢谢各位老师。
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20141231220235.png
图片点击可在新窗口打开查看
Dim str As String = "ComboBox2"
Dim bln As Boolean = e.Form.Controls("CheckBox1").Checked 
For Each k As String In str.split(",")
    e.form.Controls(k).Enabled = bln
Next 

[此贴子已经被作者于2015-1-1 9:05:07编辑过]

--  作者:czy
--  发布时间:2015/1/1 13:18:00
--  
e.Form.Controls("ComboBox2").Enabled = e.Sender.Checked