Verwenden von Steuerelementwerten während der Codeausführung
Einige Steuerelementeigenschaften können festgelegt und zurückgegeben werden, während Visual Basic-Code ausgeführt wird. Im folgenden Beispiel wird die Text -Eigenschaft eines Textfelds auf "Hello" festgelegt:
TextBox1.Text = "Hello"
Die Daten, die ein Benutzer in ein Formular eingegeben hat, gehen verloren, sobald das Formular geschlossen wird. Wenn Sie die Werte der Steuerelemente eines Formulars zurückgeben, nachdem das Formular aus dem Speicher entfernt wurde, erhalten Sie nicht die vom Benutzer eingegebenen Werte, sondern die für diese Steuerelemente definierten Ausgangswerte.
Sollen die in ein Formular eingegebenen Daten erhalten bleiben, können diese Informationen in Modulvariablen gespeichert werden, während das Formular geöffnet ist. Im folgenden Beispiel wird ein Formular angezeigt, und die Formulardaten werden vor dem Schließen gespeichert:
'Code in module to declare public variables
Public strRegion As String
Public intSalesPersonID As Integer
Public blnCanceled As Boolean
'Code in form
Private Sub cmdCancel_Click()
Module1.blnCanceled = True
Unload Me
End Sub
Private Sub cmdOK_Click()
'Save data
intSalesPersonID = txtSalesPersonID.Text
strRegion = lstRegions.List(lstRegions.ListIndex)
Module1.blnCanceled = False
Unload Me
End Sub
Private Sub UserForm_Initialize()
Module1.blnCanceled = True
End Sub
'Code in module to display form
Sub LaunchSalesPersonForm()
frmSalesPeople.Show
If blnCanceled = True Then
MsgBox "Operation Canceled!", vbExclamation
Else
MsgBox "The Salesperson's ID is: " &
intSalesPersonID & _
"The Region is: " & strRegion
End If
End Sub
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für