DÉVELOPPEMENT RAPIDE D'APPLICATIONS




Notes de cours 5

La création d'un Form



Design de l'application

Avant de commencer à créer les objets en VB, il faut normalement planifier le travail à faire. Cela veut dire d'utiliser un papier et un crayon et de dessiner un plan ou modèle de l'application. En architecture on dessine un plan de maison. En informatique on fait la modélisation de l'application.



Propriétés du form

(Name): même nom qu'on lui donne en le sauvegardant - le nom qu'on utilise lorsqu'on réfère à la feuille dans le code.

Text: nom qui apparaît dans la ligne Titre - information seulement - pas référencé dans le code.

ForeColor: couleur du texte sur le form.

BackColor: couleur du fond du form

StartPosition: où on veut que la feuille s'affiche sur l'écran à l'exécution.

Opacity: degré de transparence du form

Au sujet des noms (la propriété "Name"): on devrait utiliser un système de terminologie standard à travers toutes les applications VB. Ceci veut dire d'identifier tous les objets ainsi que les variables avec un préfixe qui est facile à reconnaitre partout dans le code.



Ajouter des controls au Form

Label, PictureBox
Label: un titre, une étiquette - utilisé pour afficher une information

PictureBox: une image - utilisé pour afficher un fichier contenant une image (.BMP, .GIF, etc) - sert pour un logo d'entreprise, par exemple





Pour mettre un control dans le form il faut d'adord sélectionner le control dans boîte d'outils qui est à la gauche de l'écran - si la boîte n'est pas là, on l'active avec le bouton Boîte d'outils .

Dans la boîte d'outils on clique sur le control voulu et puis on clique sur la feuille à l'endroit où on veut placer le control et on le traîne à la grandeur qu'on désire.

Une fois le control en place on peut changer sa grandeur, le déplacer ou l'enlever (Delete) ou faire Undo si on s'est trompé.

Pour faire une copie d'un control, on le sélectionne et on fait Copy et Paste - un nouveau nom sera assigné automatiquement au control, Label2, par exemple, mais il faudra changer le Text.

Pour sélectionner plusieurs controls on clique en haut, à gache du premier et on traine la souris jusqu'au coin droit, en bas du rectangle de sélection; on peut aussi le faire avec (Control)(Click).

Pour aligner un groupe de controls ou pour les mettre de la même grandeur, on les sélectionne tous et on utilise les boutons d'alignement: .
Le bouton Undo est bien utile si on se trompe de sélection.








Saisie de données

TextBox: sert à saisir une donnée au clavier - la donnée saisie est gardée dans la propriété Text de l'objet et on peut s'en servir à partir de là:




Voici le code, en texte, pour le form de l'exemple précédent.

Pour l'utiliser vous devez créer un form avec les même nom d'objets que dans le code et copier le code de la page Web à l'éditeur.

Option Explicit On 
Public Class frmExemple3
    Inherits System.Windows.Forms.Form
    Dim sglAchats As Single
    Dim strNomClient As String
    Dim strVilleClient As String


#Region " Windows Form Designer generated code "


    Private Sub frmExemple3_Load(ByVal sender As System.Object, 
		ByVal e As System.EventArgs) Handles MyBase.Load
        EffaceTout()
    End Sub

    Private Sub EffaceTout()
        lblResultat.Text = ""
        txtNom.Text = ""
        txtVille.Text = ""
        txtAchats.Text = ""
    End Sub

    Private Sub btnContinuer_Click(ByVal sender As System.Object, 
		ByVal e As System.EventArgs) Handles btnContinuer.Click
        strNomClient = txtNom.Text
        strVilleClient = txtVille.Text

        If Not IsNumeric(txtAchats.Text) Then
            MsgBox("Montant n'est pas numérique")
            Exit Sub
        End If

        sglAchats = txtAchats.Text

        lblResultat.Text = "Client est " _
            & strNomClient _
            & " , habite à " & strVilleClient _
            & Chr(13) & "et achète pour " _
            & sglAchats
    End Sub

    Private Sub btnCancel_Click(ByVal sender As System.Object, 
		ByVal e As System.EventArgs) Handles btnCancel.Click
        EffaceTout()
    End Sub

    Private Sub btnExit_Click(ByVal sender As System.Object, 
		ByVal e As System.EventArgs) Handles btnExit.Click
        Me.Close()
    End Sub
End Class




Les Listes

ListBox:
affiche une liste de choix dans une boîte - on sélectionne l'élément voulu en cliquant dessus - la liste peut être créée lors de la création du Form ou elle peut être créée dynamiquement pendant l'exécution du code (on verra la technique un peu plus loin).




Pour traiter le choix qui sera fait dans la liste, on fait un DoubleClick sur le ListBox, ce qui génère la procédure SelectedIndexChanged. Après, on n'a qu'a saisir le Text de l'item cliqué dans une variable. Par exemple:

          strNomDept = lstDept.SelectedItem


ComboBox:
une combinaison (de là le terme combo) d'un TextBox et d'un ListBox. Il permet à l'utilisateur de cliquer sur un item de la liste ou d'en entrer un nouveau. On utilise les 2 events Click et Change pour déterminer ce qui se passe.





Si on veut charger la liste d'items du ListBox ou celle du ComboBox au moment de l'exécution (si on n'a rien mis dans Items lors de la création de l'objet), on écrit le code approprié dans le Form_Load. Par exemple, pour le ComboBox:











Haut de la page

Accueil          Tutoriels