Mega Code Archive

 

Categories / VB.Net / Language Basics

 

Structure Variable assignment

Imports System Imports System.Data Imports System.Collections public class MainClass    Shared Sub Main()         Dim S1 As New StringStructure("Hello")         Dim S2 As StringStructure         S2 = S1         S2.SetString("Modified")         Console.WriteLine("Struct: " + S1.AString)    End Sub End Class Public Structure StringStructure     Public AString As String     Public Sub SetString(ByVal newstring As String)         AString = newstring     End Sub     Public Sub New(ByVal InitialString As String)         AString = InitialString     End Sub End Structure