标题：代码求助

1楼

bm 发表于：2011/11/2 17:32:00

Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
tab.SelectedIndex = 1

请问这一段代码在菜单里，怎么实现

2楼

狐狸爸爸 发表于：2011/11/2 17:37:00

If Forms("窗口名").Opened then

Dim tab As WinForm.TabControl = Forms("窗口名").Controls("TabControl1")
tab.SelectedIndex = 1

End If

3楼

bm 发表于：2011/11/2 17:40:00

刚才没有写

If Forms("窗口名").Opened then

谢谢狐狸爸爸，

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