Contact: aviboots(AT)netvision.net.il
39,950 questions
51,892 answers
573 users
Module Module1 Class Test Public ReadOnly Property Value() As Integer Get Return 873 End Get End Property End Class Sub Main() Dim o As Test = New Test() Console.WriteLine(o.Value) End Sub End Module ' run: ' ' 873