Utilisation des valeurs des contrôles lors de l'exécution du code
Certaines propriétés de contrôles peuvent être définies et retournées pendant l’exécution du code Visual Basic. L'exemple suivant montre comment affecter la valeur « Hello » à la propriété Text d'une zone de texte.
TextBox1.Text = "Hello"
Les données saisies dans un formulaire par un utilisateur sont perdues dès la fermeture du formulaire. Si vous renvoyez les valeurs des contrôles d'un formulaire après le déchargement de celui-ci, vous obtenez les valeurs initiales des contrôles et non celles entrées par l'utilisateur.
Si vous voulez enregistrer les données entrées dans un formulaire, vous pouvez enregistrer les informations dans des variables de niveau module pendant l'exécution du formulaire. L'exemple suivant montre comment afficher un formulaire et enregistrer ses données.
' Code in module to declare public variables.
Public strRegion As String
Public intSalesPersonID As Integer
Public blnCancelled As Boolean
' Code in form.
Private Sub cmdCancel_Click()
Module1.blnCancelled = True
Unload Me
End Sub
Private Sub cmdOK_Click()
' Save data.
intSalesPersonID = txtSalesPersonID.Text
strRegion = lstRegions.List(lstRegions.ListIndex)
Module1.blnCancelled = False
Unload Me
End Sub
Private Sub UserForm_Initialize()
Module1.blnCancelled = True
End Sub
' Code in module to display form.
Sub LaunchSalesPersonForm()
frmSalesPeople.Show
If blnCancelled = True Then
MsgBox "Operation Cancelled!", vbExclamation
Else
MsgBox "The Salesperson's ID is: " &
intSalesPersonID & _
"The Region is: " & strRegion
End If
End Sub
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour