Foxtable(狐表)用户栏目专家坐堂 → 集合控件中的控件定义


  共有6135人关注过本帖树形打印复制链接

主题:集合控件中的控件定义

美女呀,离线,留言给我吧!
hbaijia
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:205 积分:1404 威望:0 精华:0 注册:2013/4/16 16:20:00
集合控件中的控件定义  发帖心情 Post By:2013/4/16 16:23:00 [只看该作者]

Dim dm As WinForm.TextBox = Forms("工作窗口").Controls("页面").TabPages(0).Controls("代码")

应该不对,但不知怎么改,另外再请教如何判断集合中的有哪个页面是打开的,哪个没打开?还有怎样增加页面数量

[此贴子已经被作者于2013-4-16 16:28:49编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/4/16 16:30:00 [只看该作者]

你是想获得页面中的某个控件吗? 只需要.  Dim dm As WinForm.TextBox = Forms("工作窗口").Controls("代码") 即可

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/4/16 16:35:00 [只看该作者]

1、获得页面集合中选定的页面:

http://www.foxtable.com/help/topics/0832.htm

http://www.foxtable.com/help/topics/0831.htm

 

2、只能在设计的时候增加页面。


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/4/16 16:36:00 [只看该作者]

Dim tb As WinForm.TabControl = e.Form.Controls("TabControl1")
tb.SelectedPage  '获得打开的页面
tb.TabPages.Add("名称","标题")  -----增加"


[此贴子已经被作者于2013-4-16 16:37:16编辑过]

 回到顶部
美女呀,离线,留言给我吧!
hbaijia
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:205 积分:1404 威望:0 精华:0 注册:2013/4/16 16:20:00
  发帖心情 Post By:2013/4/16 16:39:00 [只看该作者]

不是,是窗口里的集合控件里又有一个文本框控制里面的值


 回到顶部
美女呀,离线,留言给我吧!
hbaijia
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:205 积分:1404 威望:0 精华:0 注册:2013/4/16 16:20:00
  发帖心情 Post By:2013/4/16 16:40:00 [只看该作者]

还有二个问题没回答啊

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/4/16 16:44:00 [只看该作者]

以下是引用hbaijia在2013-4-16 16:39:00的发言:

不是,是窗口里的集合控件里又有一个文本框控制里面的值

只要是同一个窗体 直接这样就可以获得该文本框.无论在那个TabPage

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/4/16 16:44:00 [只看该作者]

以下是引用hbaijia在2013-4-16 16:40:00的发言:
还有二个问题没回答啊

第二个问题我已经回复你了. 
Dim tb As WinForm.TabControl = e.Form.Controls("TabControl1") 
tb.TabPages.Add("名称","标题") -----增加页面"
[此贴子已经被作者于2013-4-16 16:44:55编辑过]

 回到顶部