以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于窗口的按钮e.KeyCode  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=79602)

--  作者:vvfree
--  发布时间:2016/1/5 20:51:00
--  [求助]关于窗口的按钮e.KeyCode

请问在窗体上遍历所有Button控件怎么样使其符合判断后可以点击,不符合盘点 所有Button点击无效?还有e.KeyCode的回车 要如写?

以下的KeyCode 无效?回车还是执行按钮

If e.KeyCode = Keys.Enter Then
        e.cancel = True
End If


--  作者:大红袍
--  发布时间:2016/1/5 21:00:00
--  

遍历的时候,可以设置enabled属性,让其不起作用。

 

或者是在button加入判断代码 If 条件 = False Then return

 

无法在Keydown事件控制取消触发。


--  作者:vvfree
--  发布时间:2016/1/5 21:31:00
--  回复:(大红袍)遍历的时候,可以设置enabled属性,让...

那岂不是每个button 都要写?不能同时遍历所有button 控件一起使用?


--  作者:大红袍
--  发布时间:2016/1/5 21:33:00
--  
 在afterLoad事件,循环每个button,设置Enabled属性,控制其不可用。
--  作者:vvfree
--  发布时间:2016/1/5 21:43:00
--  回复:(大红袍) 在afterLoad事件,循环每个but...

Button怎么如何像table那样循环?还是要一个个控件集合?

For Each bt As Table In Tables


--  作者:大红袍
--  发布时间:2016/1/5 21:48:00
--  

参考

 

http://www.foxtable.com/help/topics/1849.htm

 


--  作者:vvfree
--  发布时间:2016/1/6 17:22:00
--  回复:(大红袍)参考 http://www.foxtable....

AfterLoad 事件里怎么样才可以循环 所有 tables 的Current?求解


--  作者:大红袍
--  发布时间:2016/1/6 17:24:00
--  

窗口afterLoad事件啊

 


For  Each c  As WinForm.Control In e.Form.Controls
     If Typeof c Is WinForm.Button Then  \'判断控件是否是文本框
         Dim t  As WinForm.Button = c \'使用特定类型的变量引用控件
         t.Enabled = False
     End  If
 Next


--  作者:vvfree
--  发布时间:2016/1/6 17:28:00
--  回复:(大红袍)窗口afterLoad事件啊 For&n...
循环table 的Current
--  作者:vvfree
--  发布时间:2016/1/6 17:36:00
--  回复:(大红袍)窗口afterLoad事件啊 For&n...
我想是循环所有表的Current ,判断点击,这样就不用在每个表的Current 里面写代码了。。。