想实现图中所能实现的功能。
Dim tab As WinForm.TabControl = e.Form.Controls("TabControl2")
tab.SelectedIndex = 0
与
Dim bar As WinForm.NavBar = e.sender
Select Case bar.SelectedPage.ButtonText
Case "养殖户信息"
MainTable = Tables("养殖户信息(这里改成了要指向的页面号)")
End Select
都用了,但是不知道怎么把两个结合起来,气结啊,变了很多方法,请教老师来了,多谢。
![dvubb 图片点击可在新窗口打开查看](skins/default/filetype/png.gif)
此主题相关图片如下:qq截图20130907125824.png
[此贴子已经被作者于2013-9-7 16:31:11编辑过]