Private Shared mInstanceCount As Byte '實體個數
#Region "表單初始化"
Public Shared ReadOnly Property InstanceCount As Byte
Get
Return mInstanceCount
End Get '
End Property
Private Sub frmFormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
mInstanceCount -= 1
End Sub
Private Sub frmLoad(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
mInstanceCount += 1
End Sub
#End Region
求解?不知道什么意思!求大神!!!
uj5u.com熱心網友回復:
你找來的代碼,是vb.net的轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/84129.html
標籤:VB基礎類
上一篇:[求助] GetKeyValue,SetKeyValue函式操作注冊表 求實體
下一篇:表單初始化
