Comment utiliser les onglets dans visual basic

Ouvrez un nouveau projet en cliquant sur le "EXE standard" modèle lorsque des charges Visual Basic. Double-cliquez sur le "Zone de texte" contrôle dans le "Caisse à outils" dans le panneau gauche de l`écran, représentée par un petit carré contenant les lettres minuscules "un B" sur la partie supérieure droite de la boîte à outils. Répétez cette action trois fois plus si vous vous retrouvez avec quatre cases du formulaire.

Faites glisser les boîtes à part puisque chaque boîte ajouté recouvre la précédente. Cliquez sur la case supérieure et faites-le glisser hors de la voie. Répétez l`opération pour séparer les quatre cases. Cliquez sur la première case pour afficher ses propriétés dans une colonne à droite de l`écran. Faites défiler vers le bas jusqu`à ce que le "TabIndex" propriété. Cette propriété devrait être un 1 puisque les onglets par défaut à l`ordre ajouté.

Garder le "TabIndex" numéros dans l`ordre si vous ajoutez ou supprimez des boîtes, des étiquettes, et d`autres objets ou modifier l`ordre d`apparition sur la forme.

Ajouter un "Bouton de commande" à la forme de la section 1 en double-cliquant sur l`icône dans la "Caisse à outils," présentée comme petit rectangle dans la deuxième rangée de contrôles.

Ajoutez le code Visual Basic langue de texte ou des chiffres qui devraient apparaître dans les colonnes en utilisant le terme "vbTab" ou "TAB (n)" avec "n" représentant le nombre exact de places, pour un espacement plus précis. Cliquer sur "Voir / code" dans le menu en haut du formulaire créé dans la section 1. Entrez les lignes de code tels qu`ils apparaissent ci-dessous:

Private Sub Command1_Click ()

column1 Dim, column2, column3 As String

column1 = "Prénom"

column2 = "Nom de famille"

column3 = "Date de naissance"

Debug.Print column1 & vbTab & column2 & vbTab & column3

End Sub

Clique sur le "bouton Command1 sur le formulaire pour voir les résultats.

Modifiez le code à l`étape 2 comme suit pour démontrer l`utilisation des onglets pour délimiter les champs écrits dans un fichier texte, qui peut ensuite être importé dans une base de données.

Private Sub Command1_Click ()

column1 Dim, column2, column3, tabfile As String

tabfile = "c: testfile.txt"

column1 = "Prénom"

column2 = "Nom de famille"

column3 = "Date de naissance"

Ouvrir tabfile Pour la sortie Comme # 1

Imprimer # 1, onglet column1- (20) - Tab column2- (40) - column3

Close # 1

Ouvrir tabfile Pour l`entrée Comme # 1

tabfile = entrée (LOF (1), 1)

Debug.Print tabfile

Close # 1

End Sub

(Voir 3 références)

Enregistrez le projet créé à la section 1, étape 1 avec un nom de votre choix. Créer un nouveau projet en choisissant le "EXE standard" modèle. Ajoutez deux contrôles supplémentaires en cliquant sur "Projet," "Composants" dans le menu Visual Basic de haut niveau. Faites défiler la liste des composants pour trouver "Microsoft Tabbed Dialog Control 6.0" et "Microsoft Windows Common Controls 6.0 (SP6)." Clique sur le "Checkbox" à côté de chacun pour insérer une coche et "D`accord" pour les ajouter à la "Caisse à outils."

Localisez le "TabStrip" le contrôle, une boîte carrée avec une apostrophe au sommet et la "SSTab" contrôle, une icône ressemblant à pince-nez verres dans le "Caisse à outils." Si vous ne l`avez pas ajouté d`autres contrôles, les deux devraient être dans la sixième ligne. les surlignant fera apparaître le nom. Double-cliquez sur chaque pour les placer sur le formulaire. Faites-les glisser en dehors, en plaçant le "TabStrip" au dessus de "SSTab." Ajouter un "Zone de texte" en double-cliquant ce "Caisse à outils" icône. Faites-le glisser en dessous de la SSTab.

droite, cliquez sur le "TabStrip" commande pour afficher ses propriétés. Quatre onglets apparaissent en haut. Cliquer sur le second, "Tabs. " Chacun des onglets sur la forme elle-même a un "Indice" et "Légende" la propriété ainsi que d`autres. Entrez ces légendes pour chaque onglet indexé, puis cliquez sur "D`ACCORD."

Indice 1: "S`identifier"

Indice 2: "Nouvel utilisateur"

Indice 3: Envoyer Nom d`utilisateur"

Indice 4: Envoyer Mot de passe

Double-cliquez sur le "TabStrip" commande pour ouvrir la fenêtre de code et entrer ces lignes de code:

Private Sub TabStrip1_BeforeClick (Cancel As Integer)

Select Case TabStrip1.SelectedItem.Index

cas 4

MsgBox "Insérez le code login et mdp ici."

Case Else

MsgBox "Vous pouvez créer d`autres actions associées aux onglets de cette façon."

End Select

End Sub

presse "F5" pour exécuter cette partie de la requête. Essayez de cliquer sur chacun des onglets à plusieurs reprises, avant et en arrière. (Voir les références 4)

Suivez le processus à l`étape 3, maintenant en utilisant le contrôle SSTab. le "TabCaptions" sont sur la "Général" languette. Utilisez les flèches gauche et droite à côté de "Tab actuelle" pour renommer les sous-titres de la valeur par défaut comme suit:

Tab 0: "Ajouter un nouveau mode"

Tab 1: "Afficher nouvelle forme"

Tab2: "Calculatrice"

Affichez la fenêtre de code à nouveau et ajouter ces lignes:

Private Sub SStab1_click (selectedTab As Integer)

Statique active As Boolean

Si Active Puis Exit Sub

Active = Vrai

Select Case selectedTab

Case 0

Text1 = "Ajouter prochaine étape souhaitée au codage."

Cas 1

Text1 = "Ajouter une nouvelle page à afficher dans le codage"

cas 2

Text1 = "Ajouter pour afficher une calculatrice."

End Select

Active = False

End Sub

presse "F5" pour exécuter l`application et cliquez sur les différents onglets. (Voir les références 5)