Private Shared mInstanceCount As Byte 'instance number
# Region "window initialization"
Public Shared ReadOnly Property InstanceCount As Byte
The Get
Return mInstanceCount
End the Get '
End Property
Private Sub frmFormClosed (ByVal sender As Object, ByVal e the As System. Windows, Forms the FormClosedEventArgs) Handles Me. FormClosed
MInstanceCount -=1
End Sub
Private Sub frmLoad (ByVal sender As Object, ByVal e the As System. EventArgs) Handles Me. The Load
MInstanceCount +=1
End Sub
# End Region

CodePudding user response:

I need to include a vs.net environment, see the meaning of the code,