|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
实不相瞒,Java是我见过的执行效率最低的程序设计语言,前不久在CSDN论坛上有个评测,计算9999的阶乘,同样的循环算法,Java的耗时是.NET的5倍。在VB6中,多个窗体之间能够很便利地相互挪用,如:在Form1中,只必要用一条“Form2.Show”语句就可以显现窗体Form2。但是在VB.net中窗体处置机制产生了很年夜的变更:在会见窗体之前,你必需举行窗体实例化;假如在项目中有多处代码会见统一窗体,则你必需把它的统一实例指针传送给这些代码,不然新创立的窗体实例就不再是本来的窗体了。
上面的代码完成窗体Form1和Form2之间相互挪用,Form1为主窗体。Form1上的按钮BtnShowFrm2的题目为“显现Form2”,Form2上的按钮BtnShowFrm1的题目为“显现Form1”。
1、Form1中的代码:
PublicClassForm1
InheritsSystem.<ahref="http://dev.21tx.com/os/windows/"target="_blank">Windows</a>.Forms.Form
创立Form2的一个新的实例
DimFrm2AsNewForm2()
PublicFunctionInstance2(ByValfrmAsForm2)
Frm2=frm
EndFunction
PrivateSubBtnShowFrm2_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)_
HandlesBtnShowFrm2.Click
以下语句包管在Form2和其他窗体中会见Form1时,
都将失掉Form1的统一个窗体实例。
Frm2.Instance(Me)
Frm2.Show()
Me.Hide()
EndSub
EndClass
2、Form2中的代码:
PublicClassForm2
InheritsSystem.Windows.Forms.Form
Dimfrm1AsForm1
借助一个新增的Instance属性来天生窗体frm1的实例
PublicFunctionInstance(ByValfrmAsForm1)
frm1=frm
EndFunction
PrivateSubBtnShowFrm1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)_
HandlesBtnShowFrm1.Click
Me.Hide()
frm1.Show()
EndSub
PrivateSubForm2_Closed(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesMyBase.Closed
假如Form2被封闭,则设置Form1的按钮BtnShowFrm2不成用。
frm1.BtnShowFrm2.Enabled=False
frm1.Show()
EndSub
EndClass
无论谁倒了对双方阵营的粉丝们也是有害无益。 |
|