以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]怎样动态删除控件?怎样动态设置控件,使之对容器自适应? (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=42711) |
-- 作者:卧美吻花 -- 发布时间:2013/11/20 0:51:00 -- [求助]怎样动态删除控件?怎样动态设置控件,使之对容器自适应? Dim SQLCHANPIN As String = "Select xxxxxxxxxxx Where 货品id = \'" & 货品型号 & "\' Order By 成交时间" If ExistControl("销售详情") = True Then RemoveControl("销售详情") Dim tbl As WinForm.Table tbl = e.Form.CreateSQLQuery("销售详情", SQLCHANPIN,"xx服务器") tbl.SetBounds(0,0, 920, 325) e.Form.Controls("TabControl1").Tabpages(0).AddControl(tbl) 这是代码的一部分 保存的时候说 编译错误:未声明名称 “ExistControl” 帮助文件在这里 http://www.foxtable.com/help/topics/1409.htm 请问如何解决? 另,屏蔽掉判断控件是否存在的情况下,首次可以运行 但是,应该怎样设置该控件的属性?
[此贴子已经被作者于2013-11-20 0:51:15编辑过]
|
-- 作者:卧美吻花 -- 发布时间:2013/11/20 1:05:00 -- 对应 createSQLquery 有没有removeSQLquery?
|
-- 作者:程兴刚 -- 发布时间:2013/11/20 2:40:00 -- e.Form.RemoveControl("销售详情") |
-- 作者:卧美吻花 -- 发布时间:2013/11/20 9:47:00 -- 程版,请问如何判断是否存在控件?? |
-- 作者:程兴刚 -- 发布时间:2013/11/20 9:52:00 -- 您自己不是会吗?
If e.Form.ExistControl("销售详情") = True [此贴子已经被作者于2013-11-20 9:52:29编辑过]
|
-- 作者:卧美吻花 -- 发布时间:2013/11/20 11:05:00 -- 呃,这个样子的啊。。。。。没法编译 最新的开发板
[此贴子已经被作者于2013-11-20 11:05:13编辑过]
|
-- 作者:卧美吻花 -- 发布时间:2013/11/20 11:08:00 -- 请程版仔细看问题 ![]() |
-- 作者:Bin -- 发布时间:2013/11/20 11:42:00 -- 请您仔细看程版的回复! |
-- 作者:程兴刚 -- 发布时间:2013/11/20 11:48:00 -- 哈哈,您总不会end if 都不会自己加上吧?要不还有啥问题! |