以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何遍历窗口内的表控件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74939)
--  作者：blackzhu
--  发布时间：2015/9/23 10:03:00
--  如何遍历窗口内的表控件
如题

我想遍历窗口内的表控件,来做判断
--  作者：大红袍
--  发布时间：2015/9/23 10:06:00
--  

循环所有控件，然后看控件类型呗。

 

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

 
--  作者：blackzhu
--  发布时间：2015/9/23 10:13:00
--  
红袍 我这样遍历 说Table 不属于控件
--  作者：大红袍
--  发布时间：2015/9/23 10:15:00
--  
WinForm.Table
--  作者：blackzhu
--  发布时间：2015/9/23 10:24:00
--  
我是这样写的:

For Each ctl As WinForm.Control In Forms(FrmName).Controls
                If Typeof ctl Is WinForm.Table Then \'判断控件是否是文本框
                    Dim t As WinForm.Table = ctl.Table

提示错误


参考的写法是这样的:

Dim wbl As WinForm.Table = e.Form.Controls("Table1")
Dim tbl As Table = wbl.Table
tbl.DataTable.Save()


怎么改 才对呢?
--  作者：大红袍
--  发布时间：2015/9/23 10:26:00
--  
For Each ctl As Object In Forms(FrmName).Controls
    If Typeof ctl Is WinForm.Table Then \'判断控件是否是文本框
        Dim t As Table = ctl.Table
--  作者：blackzhu
--  发布时间：2015/9/23 10:28:00
--  
我靠! 我第一次写的时候就是这样写 为嘛我的就提示错误呢?
[此贴子已经被作者于2015/9/23 10:28:11编辑过]
--  作者：大红袍
--  发布时间：2015/9/23 10:29:00
--  
For Each ctl As Object In Forms(FrmName).Controls