Page 93 - Programming VB.NET
P. 93
Code With VB.Net 89
Public Property regnum() As String
Get
Return strregnum
End Get
Set(ByVal value As String)
strregnum = value
End
Set
End Property
Public Property mark() As Integer
Get
Return intmark
End Get
Set(ByVal value As Integer)
If value >= 0 And value <= 100 Then
intmark = value
Else
MessageBox.Show("Invalid value")
End If
End Set
End Property