Define and use Structure : Structure « Class Module « VB.Net Tutorial

1. VB.Net Tutorial
2. Class Module
3. Structure

Structure CheckRecord
    Dim intCheckNumber As Integer
    Dim dteCheckDate As Date
    Dim sngCheckAmount As Single
    Dim strCheckPaidTo As String
End Structure

public class Test
   public Shared Sub Main

        Dim udtCheck As CheckRecord

        'Add data to the structure.
        udtCheck.intCheckNumber = 275
        udtCheck.dteCheckDate = #9/12/2001#
        udtCheck.sngCheckAmount = 104.25
        udtCheck.strCheckPaidTo = "Gas Co."

        Console.WriteLine("CHECK INFORMATION")
        Console.WriteLine("Number: " & udtCheck.intCheckNumber)
        Console.WriteLine("Date: " & udtCheck.dteCheckDate)
        Console.WriteLine("Amount: " & udtCheck.sngCheckAmount)
        Console.WriteLine("Paid To: " & udtCheck.strCheckPaidTo)


   End Sub
End class

CHECK INFORMATION
Number: 275
Date: 12/09/2001
Amount: 104.25
Paid To: Gas Co.