Comment utiliser les onglets dans Visual Basic

Formatage et délimitant avec onglets

• 1

  Ajouter un "CommandButton" à la forme de la section 1 en double-cliquant sur l'icône dans la "Boîte à outils," présentée comme petit rectangle dans la deuxième rangée de contrôles.

• 2

  Ajouter le code Visual Basic de la langue de texte ou de chiffres qui doivent 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 de la forme créée dans la section 1. Entrez 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 d'anniversaire"

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

  End Sub

• 3

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

• 4

  Modifiez le code dans l'étape 2 comme suit pour démontrer en utilisant les onglets pour délimiter les champs écrites 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 d'anniversaire"

  Ouvrir tabfile Pour la sortie n ° 1 Comme

  
  

  
  

  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)

Création Tab objets dans une application

• 1

  Enregistrez le projet créé dans la section 1, l'étape 1 avec un nom de votre choix. Créez 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 à trouver "Microsoft Tabbed Dialog Control 6.0" et "Microsoft Windows Common Controls 6.0 (SP6)." Clique sur le "Case" à côté de chaque pour insérer une coche et "D'ACCORD" pour les ajouter à la "Boîte à outils."

• 2

  Localisez le "TabStrip" le contrôle, une boîte carrée avec une apostrophe au sommet et de la "SSTab" contrôle, une icône ressemblant à pince-nez verres dans le "Boîte à outils." Si vous ne l'avez pas ajouté d'autres contrôles, les deux devraient être dans la sixième ligne. Soulignant les fera apparaître le nom. Double-cliquez sur chacun 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 "Boîte à outils" icône. Faites-le glisser en dessous de la SSTab.

• 3

  droit; cliquez sur le "TabStrip" commande pour afficher ses propriétés. Quatre onglets apparaissent en haut. Cliquer sur la deuxième, "Onglets. " Chacun des onglets sur la forme elle-même a un "Index" et un "Légende" bien, plus les autres. Entrez ces légendes pour chaque onglet indexée, puis cliquez sur "D'ACCORD."

  Indice 1: "S'identifier"

  
  

  
  
  

  Indice 2: "Nouvel utilisateur"

  Indice 3: Envoyer Nom de l'utilisateur"

  Indice 4: Envoyer Mot de passe

• 4

  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

  Case 4

  MsgBox "Insérez login et code PWD ici."

  Case Else

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

  End Select

  End Sub

  Appuyez "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)

• 5

  Suivez le processus à l'étape 3, maintenant en utilisant le contrôle SSTab. La "TabCaptions" sont sur la "Général" onglet. Utilisez les flèches gauche et droite à côté de "L'onglet courant" renommer les légendes de la valeur par défaut comme suit:

  Tab 0: "Ajouter nouvelle forme"

  Tab 1: "Afficher nouvelle forme"

  Tab2: "Calculatrice"

• 6

  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

  Actif = True

  Select Case selectedTab

  Case 0

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

  Cas 1

  Text1 = "Ajouter une nouvelle page pour l'afficher dans le codage"

  Cas 2

  Text1 = "Ajouter à afficher une calculatrice."

  End Select

  Active = False

  End Sub

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