Variable ändert sich selbstständig

[Marry]

Hallo,

ich habe ein Problem bei der Klassenzuweisung. Ich habe eine selbst erstellte Klasse und 2 Variablen vom Typ der Klasse. Variable2 bekommt den Wert von Variable1. Später verändere ich den Wert von Variable1. Dabei wird automatisch der Wert von Variable2 geändert. Ich möchte jedoch das Variable2 den ursprünglichen Wert behält. Hier ein vereinfachtes Bespiel:

Module Module1
  Sub Main()
    Dim MyWert1 As New clsWert
    Dim MyWert2 As clsWert
    MyWert1.Wert = "1"
    MyWert2 = MyWert1
    Console.WriteLine("MyWert1: " & MyWert1.Wert)
    Console.WriteLine("MyWert2: " & MyWert2.Wert)
    MyWert1.Wert = "2"
    Console.WriteLine("MyWert1: " & MyWert1.Wert)
    Console.WriteLine("MyWert2: " & MyWert2.Wert)
    Console.ReadLine()
  End Sub
End Module

Public Class clsWert
  Private mvarWert As String
  Public Property Wert As String
    Get
      Wert = mvarWert
    End Get
    Set(value As String)
      mvarWert = value
    End Set
  End Property
End Class

Ausgabe:

MyWert1: 1
MyWert2: 1
MyWert1: 2
MyWert2: 2

Was kann ich tun, damit der Wert von Variable2 (MyWert2.Wert) nicht automatisch geändert wird?

[Christian Marquardt]

Eine neue Instanz für MyWert2 erzeugen, anstatt eine Referenz auf die erste Instanz

[Marry]

Hallo Christian,

Viele Dank für die schnelle Antwort! Manchmal kann die Lösung so einfach sein...