Private myType As Type
 
Public Sub New(ByRef frmForm As System.Windows.Forms.Form)
  myType = GetType(frmForm)
End Sub
 
Public ReadOnly Property Version() As String
  Get
    Return myType.Assembly.GetName.Version.ToString()
  End Get
End Property