Structure with Constructor : Structure « Language Basics « VB.Net

Structure with Constructor

Imports System

Public Class MainClass
    Shared Sub Main()
        Dim loc1 As New Location(200, 300)

        Console.WriteLine("Loc1 location: {0}", loc1)

        Dim loc2 As New Location(  )
        Console.WriteLine("Loc2 location: {0}", loc2)


        Console.WriteLine("Loc1 location: {0}", loc1)
    End Sub

    Shared Public Sub myFunc(ByVal loc As Location)
        loc.XVal = 50
        loc.YVal = 100
        Console.WriteLine("Loc1 location: {0}", loc)
    End Sub

End Class

      ' declare a Structure named Location
     Public Structure Location
         ' the structure has private data
         Private myXVal As Integer
         Private myYVal As Integer

         ' constructor
         Public Sub New( _
            ByVal xCoordinate As Integer, ByVal yCoordinate As Integer)
             myXVal = xCoordinate
             myYVal = yCoordinate
         End Sub 'New

         ' property

         Public Property XVal(  ) As Integer
                 Return myXVal
             End Get
             Set(ByVal Value As Integer)
                 myXVal = Value
             End Set
         End Property

         Public Property YVal(  ) As Integer
                 Return myYVal
             End Get
             Set(ByVal Value As Integer)
                 myYVal = Value
             End Set
         End Property

         ' Display the structure as a String
         Public Overrides Function ToString(  ) As String
             Return String.Format("{0}, {1}", xVal, yVal)
         End Function 'ToString
     End Structure 'Location


Related examples in the same category

1.Structure Variable assignment
2.ToString Method for Structure data typeToString Method for Structure data type
3.Structure overrides ToString method
4.Store Structure into a Collection
5.Compare Structure and ClassCompare Structure and Class
6.Pass Structure into a FunctionPass Structure into a Function
7.Simple Structure DemoSimple Structure Demo
8.ValueType.Equals Method Indicates whether this instance and a specified object are equal.