Utilisation de variables dans votre code VB NET

Dans cette section, nous allons apprendre comment transférer le contenu d'une zone de texte à une autre zone de texte. On y apprend aussi de transférer le texte d'une étiquette à une zone de texte, et tout ce qui était dans la zone de texte que nous allons transférer à une étiquette. Cela va nous amener un peu plus de pratique avec des variables, et comment les utiliser.
Ok, commencer un nouveau projet Visual Basic. Vous devriez savoir comment faire cela maintenant, et ce que l'environnement de conception ressemble. Mais vous devez avoir un formulaire de gris clair sur votre écran. Par défaut, il sera appelé Form1.
Assurez-vous que le formulaire est sélectionné (il a obtenu les carrés blancs autour de lui?), Et le clic de la propriété Name dans la fenêtre Propriétés. Changer le nom de la forme de frmVariables.
Définissez la propriété Text du formulaire de «transfert d'informations". Vous pouvez choisir n'importe quelle couleur de fond que vous aimez pour la forme, ou le laisser sur la valeur par défaut.
Mettez les commandes suivantes sur le formulaire, et modifier leurs propriétés à l'un est précisé ci-dessous (NOTE: LBL est l'abréviation de l'étiquette):
Encadré

Nom: txtVariables
Police: MS Sans Serif, Gras, 10
Texte Effacer le texte par défaut "Text1" et le laisser vide

Étiquette

Nom: lblTransfer
BackColor: Une couleur de votre choix
Texte: Légende de l'étiquette
Police: MS Sans Serif, Gras, 10

Bouton

Nom: btnTransfer
Texte: Transfert

La hauteur de vos commandes est entièrement à vous.
Si vous double-cliquez sur votre bouton pour faire apparaître la fenêtre de code, vous verrez que la première ligne du code ne dit plus Button1_Click (etc). La première ligne doit dire ce

Private Sub btnTransfer_Click (expéditeur de ByVal comme System.Object, _
ByVal e As System.EventArgs) _
Poignées btnTransfer.Click

End Sub

La raison pour laquelle il a changé, c'est parce que vous avez changé la propriété Name du bouton. Le bouton porte désormais le nom btnTransfer. Si vous voulez, vous pouvez modifier la propriété Name retour à Button1. Ensuite, lorsque vous double-cliqué sur le bouton, la fenêtre de code serait pop up et la première ligne serait Button1_Click (etc).
Ce que nous allons faire maintenant est de transférer le texte sur l'étiquette ("Légende de l'étiquette") à notre champ de saisie vide. Et tous avec le clic d'un bouton.
Comme vous le verrez, il n'y a pas beaucoup de code.
Tapez la commande suivante dans votre fenêtre de code:

LabelContents Dim As String

LabelContents = lblTransfer.Text

txtVariables.Text = LabelContents

Votre fenêtre de code devrait maintenant ressembler à ceci:

Maintenant, lancez votre programme et de le tester. Lorsque vous cliquez sur le bouton "Transfert", vous devriez voir que le contenu de l'étiquette seront insérés dans la zone de texte:

Mais nous allons briser le code en bas et voir ce qui se passe.

LabelContents Dim As String

C'est là que nous avons créé une variable appelée LabelContents. Parce qu'il tiendra texte, nous avons utilisé le type de variable As String.

LabelContents = lblTransfer.Text

C'est là que nous avons mis quelque chose dans notre variable vide. Nous avons changé la propriété du nom de notre label de la Label1 par défaut à lblTransfer. Une étiquette a beaucoup de propriétés que vous pouvez manipuler. Une de ces propriétés est la propriété Text. Après avoir tapé le mot «lblTransfer», puis tapé un arrêt complet, vous avez probablement vu un menu déroulant apparaîtra. A l'intérieur de la boîte est une liste de toutes les propriétés et méthodes qu'une étiquette dispose. Nous avons voulu manipuler la propriété Text de notre label si nous avons choisi le mot texte après l'arrêt complet. Donc, nous disions «accéder à la valeur de la propriété Text du label appelé lblTransfer, et de mettre cette valeur dans les dits LabelContents variables." Parce que notre texte était "" Légende de l'étiquette », les LabelContents variable contient maintenant le texte" Légende de l'étiquette. "

txtVariables.Text = LabelContents

Enfin, nous voulons transférer ce qui est dans les LabelContents variable à la zone de texte. Notre zone de texte est appelé txtVariables. Encore une fois, après avoir tapé l'arrêt complet du menu déroulant apparaît, vous montrant une liste de toutes les propriétés d'une zone de texte a. Celui qui nous intéresse est la propriété du texte. Nous disons donc: «Prenez n'importe quel texte est dans les LabelContents variables, et de le transférer à la propriété Text de la zone de texte appelé txtVariables.

Et avec trois lignes de code, nous pouvons transférer le texte d'une étiquette à une zone de texte. Mais pouvons-nous le faire dans l'autre sens? Pouvons-nous transférons ce qui est dans une zone de texte à une étiquette? Oui, bien sûr que nous pouvons.
Ajouter un autre bouton à votre formulaire. Changer sa propriété Name de Button1 à cmdTransferToLabel et modifier la propriété Caption "Transfert à l'étiquette". Encore une fois, il ya seulement trois lignes de code.
Donc, double-cliquez sur votre nouveau bouton pour faire apparaître la fenêtre de code. Ensuite, tapez le code suivant:

TextBoxContents Dim As String

TextBoxContents = txtVariables.Text

lblTransfer.Text = TextBoxContents

Maintenant, voyez si vous pouvez travailler sur la façon dont cela fonctionne. C'est la même chose que les trois premières lignes de code: mise en place d'une variable, transférer la propriété Text de la zone de texte à la variable, transférer la variable à la propriété Text de l'étiquette. Exécutez votre programme et le tester. Tapez quelque chose dans la zone de texte, puis cliquez sur le bouton "Transférer à l'étiquette".

Exercice E

Un bouton a également une propriété de texte. Ecrire le code de transférer la propriété du texte d'un bouton pour la zone de texte. C'est probablement mieux pour cet exercice pour créer un nouveau bouton. Définissez sa propriété du nom de celui que vous aimez. Et de donner sa propriété Text une nouvelle valeur (la propriété du texte sera Button1 par défaut).
Mais le processus est exactement le même que les deux bouts de code ci-dessus - vous ne devriez avoir besoin 3 lignes de code pour cet exercice.

• Mettre en place une variable
• Transfert de la propriété Text du bouton à la variable
• Transférer la variable de la zone de texte 

Solution

ButtonContents Dim As String
ButtonContents = Button1.Text

txtVariables.Text = ButtonContents 

Dans la partie suivante, nous allons lancer un projet de calculatrice. Cela vous mettra peu plus d'expérience de travail avec des variables.

Posted in: Visual Basic .NET