Au lieu de mettre texte directement dans vos variables, telles que
"Bill" ou "Gates", vous pouvez obtenir le texte d'un champ de saisie et
de mettre ce droit dans vos variables. Nous allons voir comment c'est fait maintenant. Tout d'abord, faire ceci:
- Ajouter une nouvelle zone de texte à votre formulaire
- Avec la zone de texte sélectionnée, recherchez la propriété Name dans la zone Propriétés:
Cliquez sur votre première zone de texte pour le sélectionner. Changez la propriété Nom de Textbox1 à txtFirstName.
Ce que nous avons fait, c'est de donner les deux champs de saisie des noms plus descriptifs. Cela nous aidera à ne pas oublier ce qui est censé aller en eux.
Malheureusement, si vous affichez votre code (cliquez sur l'onglet Form1.vb au sommet, ou appuyez sur F7 de votre clavier), vous verrez que les lignes ondulées bleues sont de retour:
txtFirstName.Text = FullName
Lancez votre programme. Si vous voyez des messages d'erreur, arrêter le programme et rechercher les lignes ondulées dans votre code. Nous allons maintenant changer notre code un peu, et de faire usage de la deuxième zone de texte. Vous verrez comment obtenir le texte que l'utilisateur entre.
Localisez ces deux lignes de code
Prénom = "Bill"
NOM = "Gates"
Changez-les à cette NOM = "Gates"
Prénom = txtFirstName.Text
NOM = txtLastName.Text
Rappelez-vous: l'égal (=) signe attribue choses: ce qui est sur la
droite du signe égal est attribué, à tout ce qui est sur la gauche. Ce que nous faisons maintenant est d'attribuer le texte des zones de texte directement dans les deux variables. NOM = txtLastName.Text
Modifier votre code légèrement afin que toute le nom est maintenant affichée dans une boîte de message. Votre code devrait maintenant être la suivante:
Prénom Dim As String
NOM Dim As String
Wholename Dim As String
NOM Dim As String
Wholename Dim As String
Prénom = txtFirstName.Text
NOM = txtLastName.Text
NOM = txtLastName.Text
Wholename = Prénom & "" & NOM
MsgBox (wholename)
Exécutez votre programme. Entrez "Bill" dans la première zone de texte, et "Gates" dans la deuxième zone de texte. Ensuite, cliquez sur le bouton "Test String". Vous devriez obtenir ceci:
Prénom = "Bill"
Mais ce que nous voulons vraiment faire est d'obtenir le nom d'une personne directement à partir de la zone de texte. Cela va rendre la vie beaucoup plus facile pour nous. Après tout, tout le monde ne s'appelle Bill Gates! Dans le Prénom de ligne = txtFirstName.Text c'est ce que nous faisons - obtenir le nom directement à partir de la zone de texte. Ce que nous disons à Visual Basic est cette - Cherchez une zone de texte qui contient le nom txtFirstName
- Localisez la propriété Text de la zone de texte qui contient le nom txtFirstName
- Lisez tout ce que cette propriété Text est
- Mettez cette propriété Text dans le Prénom variables
Exercice
- Ajouter une troisième zone de texte à votre formulaire
- Changer sa propriété Name à txtWholeName
- Ajouter des étiquettes à votre formulaire d'identifier chaque zone de texte (A moyen rapide d'ajouter plus d'étiquettes est d'utiliser la boîte à outils pour ajouter une étiquette. Ensuite, faites un clic droit sur cette étiquette. Choisissez Copier dans le menu. Faites un clic droit sur le formulaire, puis sélectionnez Coller.)
- Ecrire le code de sorte que lorsque le bouton "Test String" est cliqué, l'ensemble du nom de la personne s'affiche dans votre nouvelle zone de texte
Solution
Prénom Dim As String
NOM Dim As String
Wholename Dim As String
NOM Dim As String
Wholename Dim As String
Prénom = txtFirstName.Text
NOM = txtLastName.Text
NOM = txtLastName.Text
Wholename = Prénom & "" & NOM
txtWholeName.Text = wholename
0 commentaires:
Enregistrer un commentaire