老师, 页面关闭时,有提示,怎么改,请老师帮忙看下
e.Sender.SelectedPage.Visible = False
Dim top() As Integer = {1,2,3,4,5,6,7,8,9,10,11,12}
'Dim Dop() As String ={"BOM","物料",...}
Select Case e.Sender.TabPages
Case 0
Dim pg As WinForm.TabPage = Forms("主界面").Controls("TabControl1").TabPages("BOM")
pg.Visible = False
Forms("主界面").Controls("TabControl1").SelectedIndex = 0
Case 1
Dim pg As WinForm.TabPage = Forms("主界面").Controls("TabControl1").TabPages("物料")
pg.Visible = False
Forms("主界面").Controls("TabControl1").SelectedIndex = 0
End Select
错误提示
.NET Framework 版本:2.0.50727.3053
Foxtable 版本:2014.11.11.1
错误所在事件:窗口,主界面,TabControl1,Click
详细错误信息:
Operator '=' is not defined for type 'TabPageCollection' and type 'Integer'.