以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  遍历窗口控件,移出表的全部记录  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=153618)

--  作者:czy66ds
--  发布时间:2020/8/17 12:41:00
--  遍历窗口控件,移出表的全部记录
清空组合框的内容:
For Each c As WinForm.Control In e.Form.Controls
    If Typeof c Is WinForm.ComboBox Then \'判断控件是否是组合框
        Dim t As WinForm.ComboBox = c \'使用特定类型的变量引用控件
        t.Value = Nothing
    End If
Next
通过

移出表的全部记录:
For Each c As WinForm.Control In e.Form.Controls
    If Typeof c IsWinForm.Table Then \'判断控件是否是表格
        Dim t As WinForm.Table = c \'使用特定类型的变量引用控件

t.Table.。。。往下就不会了
       
    End If
Next


--  作者:有点蓝
--  发布时间:2020/8/17 13:42:00
--  
【移出表的全部记录】指什么?删除全部记录?

用法和平时table表格的用法完全一样的

--  作者:czy66ds
--  发布时间:2020/8/17 13:45:00
--  
就是Remove
--  作者:有点蓝
--  发布时间:2020/8/17 13:52:00
--  
移除所有记录?还是移除这个表格?
--  作者:czy66ds
--  发布时间:2020/8/17 14:25:00
--  
移出记录
--  作者:有点蓝
--  发布时间:2020/8/17 14:41:00
--  
t.Table.datatable.removefor("")