以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关闭动态控件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=18168)

--  作者:老有所乐
--  发布时间:2012/4/5 10:46:00
--  关闭动态控件

我在 窗口1  用按钮(代码如下)生成窗口表

Dim tbl As WinForm.Table
tbl = e.Form.CreateTable("Table1", "统计", False)
tbl.SetBounds(9, 110, 600, 400)
e.Form.AddControl(tbl)

想用另一按钮关闭,代码如何写,请老师指教,谢谢!


--  作者:blackzhu
--  发布时间:2012/4/5 11:14:00
--  

RemoveControl

用于从窗口删除指定名称的控件,语法为:

RemoveControl(Name)

Name:字符型,要删除的控件地名称。

ExistControl

返回一个逻辑值,用于判断窗口是否存在指定名称的控件,语法为:

ExistControl(Name)


--  作者:老有所乐
--  发布时间:2012/4/5 14:09:00
--  

RemoveControl语法例子很少,不会用

还是发个例子,请老师指导

 请帮老师帮写一下“关闭动态显示窗口”按钮代码,谢谢!

发错了文件,重发。

先点击“统计”,生成统计表,再点击“动态生成统计窗口”按钮,显示统计数据,要求点击“关闭动态显示窗口”按钮后,所显示的统计窗口消失。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目22.table

[此贴子已经被作者于2012-4-5 14:30:46编辑过]

--  作者:程兴刚
--  发布时间:2012/4/5 14:51:00
--  

e.Form.RemoveControl("Table1")

 

您会说,原来好简单哪!


--  作者:老有所乐
--  发布时间:2012/4/5 15:07:00
--  
谢谢程老师!难怪通不过,我把它写成

e.Form.RemoveControl("Tb1")

Forms("窗口1").RemoveControl("Tb1")