ميف نستدعي Constructor قي Class اخر

Public Sub New(ByVal nname As String, ByVal aaddress As String, ByVal pphone As Integer, ByVal eemail As String)

mName = nname

mAddress = aaddress

mPhone = pphone

mEmail = eemail

End Sub