以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口中所有表的名称  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=107692)

--  作者:kaituozhe
--  发布时间:2017/10/8 7:42:00
--  窗口中所有表的名称
我想遍历窗口中所有的表,怎么写代码?
--  作者:有点甜
--  发布时间:2017/10/8 8:54:00
--  
For Each c As object In forms("窗口1").controls
    If typeof c Is winform.Table Then
        Dim t As Table = c.Table
        msgbox(t.name)
    End If
Next