Class XORR Private _hamzao As String Sub New(Hamzao As String) ' TODO: Complete member initialization _hamzao = Hamzao End Sub End Class