Contrôles

1 - Le contrôle Timer

A chaque occurrence d'un événement Timer, la procédure Timer1_Tick est invoquée.
Réglez l'intervalle de temps entre 2 'Tick' en millisecondes.
Démarrage et arrêt se font par:

Timer1.Enable = True
Timer1.Enable = False

On peut également utiliser:

Timer1.Start()
Timer1.Stop

2 - Les barres d'outils

ToolBar est une barre d'outils contenant des boutons. Elle peut être associée à un contrôle ImageList par sa propriété ImageList. Ce contrôle sert à contenir les images destinées à être affichées sur les boutons de la barre d'outils.
Pour déterminer sur quel bouton on a cliqué, utilisez la propriété IndexOf des boutons.

Select Case ToolBar1.Buttons.IndexOf(e.Buttons)
Case Is = ...
End Select

3 - Le lien hypertexte

Dans un LinkLabel on peut définir comme lien hypertexte une partie seulement de la propriété Text en réglant les valeurs Start et Lenght de la propriété LinkArea. Exemple :

Link.Label1.Text = "Écrivez-moi : csoulie@orange.fr".

Si LinkArea a pour valeur 15;31, seule la partie commençant à csoulie sera utilisée comme lien internet.
La procédure LinkLabel_LinkClicked peut envoyer vers un site web :

System.Diagnostics.Process.Start(http://www.microsoft.fr)

Ou vers la messagerie :

System.Diagnostics.Process.Start(mailto:csoulie@orange.fr)

4 - Le contrôle ToolTip

Ce contrôle permet d'associer une infobulle à un contrôle.
Pour commencer, il faut placer un contrôle ToolTip sur le formulaire (nommons-le par exemple TT1).
Ensuite, pour associer un texte à un contrôle, il faut utiliser la méthode SetToolTip sur un évènement MouseHover, par exemple :

Private Sub Button1_MouseHover(...
TT1.SetToolTip(Button1, "Texte à écrire")
End Sub

On peut définir si l'affichage du texte doit être effectué ou non en utilisant la propriété Active du contrôle ToolTip.

TT1.Active = True

5 - Le contrôle RichTextBox

6 - Les menus

7 - Le contrôle MSFlexGrid

Le contrôle Microsoft FlexGrid permet de réaliser très facilement des tableaux.
Il suffit de l'ajouter dans la boîte à outils pour pouvoir l'utiliser.
Le fichier s'appelle "msflxgrd.ocx".

1 - Principales propriétés du contrôle

Supposons notre tableau (ou grille) nommé "Gr".

Gr.Rows = 12 Gr.Cols = 4	définit 12 lignes dans la grille définit 4 colonnes dans la grille
Gr.Row = 5 Gr.Col = 0	sélectionne la cellule de la 6ème ligne et de la 1ère colonne, les index commençant à zéro
Gr.Text = "Dupont"	définit le contenu de la cellule sélectionnée
Gr.set_ColWidth(n,x)	définit une largeur n pour la colonne x
Gr.set_ColAlignment(x,n)	définit l'alignement dans les cellules de la colonne x. Le texte prend la position suivante en fonction de n : 0..........3..........6 En haut et à gauche : n = 0 1..........4..........7 2..........5..........8 En bas et à droite : n = 8
Gr.CellBackColor = Black Gr.CellForeColor = White	le fond de la cellule courante sera noir le texte sera blanc
Gr.TopRow = n	n sera la 1ère ligne visible du tableau
Gr.set_TextMatrix(8, 0, "Dupont")	définit le texte de la cellule, ligne 8 colonne 0, sans passer par la localisation avec Row et Col

2 Mise en forme et initialisation rapide d'un tableau

Lorsqu'on charge un formulaire contenant un tableau, il faut, bien souvent, définir les caractéristiques de base de ce tableau (largeur des colonnes, alignement, entête des colonnes, etc... Voici un exemple de code pour un tableau à 4 colonnes.

For Co = 0 To 3
  Gr.set_ColWidth(Co, Choose(Co + 1, 400, 400, 400, 600))
  Gr.set_ColAlignment(Co, 7) ' Alignement à droite
  Gr.Col = Co
  Gr.Text = Choose(Co + 1, "Débit", "Crédit", "Total", "Solde")
Next