以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  动态增加表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74443)

--  作者:kaituozhe
--  发布时间:2015/9/11 0:25:00
--  动态增加表

设计以下代码,想实现在组合框中输入表的名称,然后在窗口中增加需要的表。

Dim tbl As WinForm.Table
\'With e.Form.Controls("TextBox5")
tbl = e.Form.CreateTable("Table1"," \'"& e.Form.Controls("TextBox5").value &"\'", False)
tbl.SetBounds(320, 85, 950, 450)
e.Form.AddControl(tbl)
\'End With


--  作者:kaituozhe
--  发布时间:2015/9/11 0:26:00
--  

这是提示的内容

.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2014.11.11.1
错误所在事件:窗口,查询平台,Button1,Click
详细错误信息:
未将对象引用设置到对象的实例。


--  作者:大红袍
--  发布时间:2015/9/11 9:12:00
--  
Dim tbl As WinForm.Table
tbl = e.Form.CreateTable("Table1", e.Form.Controls("TextBox5").value, False)
tbl.SetBounds(320, 85, 950, 450)
e.Form.AddControl(tbl)