问题描述
1.定义了共用变量数组为Panel型。2.调入窗体后,首先通过过程“选项卡添加控件(1)”,动态地向TabControl中的TabPage1中添加了控件数组实例Panel(1)3.接下来想通过一个过程选项卡设置(1)来调整相关控件的大小、位置等属性。这个“Call选项卡设置(1)”过程也会在窗体大小调整时再次调用。问题:调用Call选项卡设置(1),设置Panel(1)时,出现错误,提示该控件不存在。尝试:改变Panel的边缘属性,让其在程序运行时可见,则建立的Panel控件存在,但试图设置属性时,系统报错。如果在第二个过程中新建实例,则旧Panel存在,设置属性时,仅对新建的有效。请高手解疑!多谢!PS.本人是医生,想写这个VB小程序来处理下工作中的事情,对电脑只是业余爱好,请解疑时多费些笔墨!多谢!附代码:PublicClassfrm_Main'公用变量定义Publicctr_Panel(3)AsPanel'PrivateSubForm1_Load(senderAsObject,eAsEventArgs)HandlesMyBase.Load'在选项卡添加控件Call选项卡添加控件(1)'设置选项卡Call选项卡设置(1)EndSubSub选项卡设置(intIAsInteger)'面板设置Withctr_Panel(intI).Width=Me.tp_Today.Width-10.Height=Me.tp_Today.Height-35EndWithEndSubSub选项卡添加控件(intIAsInteger)'添加面板ctr_Panel(intI)=NewPanelMe.Controls.Add(ctr_Panel(intI))Withctr_Panel(intI).BorderStyle=BorderStyle.FixedSingle.AutoScroll=True.Top=30.Left=3EndWithEndSubEndClass
解决方案
解决方案二:
没有人回答,自己顶一下!
解决方案三:
哪里错了?报什么错?Me.Controls.Add(ctr_Panel(intI))
新建Panel明明是添加到窗体上的,哪里和TabPage1发生关系了?
解决方案四:
经过无数次的百度后,终于搞明白了添加一句If控件变量IsNothingThen就可以了!