<font color=green>' im Forumlar-Code</font>
Private mNeueEigenschaft As String
 
Public Property Get NeueEigenschaft() As String
  NeueEigenschaft = mNeueEigenschaft
End Sub
 
Public Property Let NeueEigenschaft(ByVal nValue As String)
  mNeueEigenschaft = nValue
End Sub

Dim myForm As Form
Set myForm = New Form1
myForm.NeueEigenschaft = "Test"
MsgBox myForm.NeueEigenschaft