共7 条记录, 每页显示 10 条, 页签: [1]

标题：求教:如何用代码求得页面集合的第N页?

1楼

yangming 发表于：2009/11/20 12:40:00

求教:如何用代码打开页面集合的第N页?我用下面的代码,报错了

With Forms("RS_档案明细").Controls("TabControl1").Pages("个人简历")
.......
End With

这样也不行
Dim pg As WinForm.TabPage
pg =e.Form.Controls("TabControl1").TabPages(1)
pg.Visible = True

[此贴子已经被狐狸爸爸于2009-11-20 17:55:00编辑过]

2楼

狐狸爸爸 发表于：2009/11/20 13:03:00

pg =e.Form.Controls("TabControl1").Pages(1)

3楼

yangming 发表于：2009/11/20 13:38:00

以下是引用狐狸爸爸在2009-11-20 13:03:00的发言：
pg =e.Form.Controls("TabControl1").Pages(1)

Dim pg As WinForm.TabPage
pg =e.Form.Controls("TabControl1").Pages(1)
pg.Visible = True

这样仍报错

4楼

yangming 发表于：2009/11/20 16:58:00

页面集合的各标题如何写代码?我这样写出错
e.Form.Controls("TabControl1").Pages.text

5楼

狐狸爸爸 发表于：2009/11/20 17:44:00

测试通过:

Dim pg As WinForm.TabPage
pg =e.Form.Controls("TabControl1").TabPages(1)
pg.Visible = False

6楼

yangming 发表于：2009/11/20 17:51:00

以下是引用狐狸爸爸在2009-11-20 17:44:00的发言：
测试通过:

Dim pg As WinForm.TabPage
pg =e.Form.Controls("TabControl1").TabPages(1)
pg.Visible = False

这样是可以,这只是隐藏,我是要打开此页,如同手动打开此页一样

7楼

狐狸爸爸 发表于：2009/11/20 17:54:00

测试有效：

e.Form.Controls("TabControl1").selectedindex = 1

共7 条记录, 每页显示 10 条, 页签: [1]