Nur ein ganz kurzes Beispiel, um zu zeigen, wie ein Call-By-Value & Call-By-Reference aufgebaut ist.
Private Sub btByRef_Click() tbAusgabe.Text = TestByRef(tbEingabe.Text) End Sub Private Sub btByVal_Click() tbAusgabe.Text = TestByVal(tbEingabe.Text) End Sub Public Function TestByRef(ByRef zahl As Integer) As Integer zahl = zahl + 1 End Function Public Function TestByVal(ByVal zahl As Integer) As Integer zahl = zahl + 1 Return zahl End Function
Will man über den Form_Load Event Objekte initialisieren, so hat dies den Nachteil, dass die Objekte auch bei einem PostBack wieder initialisiert werden. Um dies zum umgehen kann man den folgenden Code verwenden, welcher die Objekte nur initialisiert, wenn kein PostBack durchgeführt wird.
If not IsPostBack Then
Hier der Code....
End If