CodePPC - Programmez votre Pocket PC

Pour écrire des programmes avec eVB, on utilise un façon de programmer qui s'appelle la programmation événementielle. Cette manière de programmer consiste tout simplement à répondre aux actions de l'utilisateur. Ces actions sont, dans le vocabulaire eVB, des événements.

Dans le programme d'exemple que nous sommes en train de construire, nous allons effectuer une opération lorsque l'utilisateur cliquera sur le bouton "Ajouter", nous allons donc répondre à l'événement "Click" du bouton "BOU_Ajouter".

Pour accéder au code des événements d'un contrôle, il suffit de double-cliquer sur le contrôle concerné pour faire apparaître la fenêtre de saisie de code :

Comme vous pouvez le constater, cette fenêtre de code s'est automatiquement placée sur le contrôle "BOU_Ajouter" (combo des contrôles) et sur l'événement "Click" (combo des événements) qui est l'événement par défaut du contrôle CommandButton.

Les 2 combos permettent de naviguer dans tous les contrôles gérant des événements dans la fenêtre concernée (ici FormMain) et dans tous les événements de chacun des contrôles.

Il ne nous reste plus qu'à écrire le code lié au click sur le bouton "Ajouter".

Nous avons précisé dans la première partie de ce tutorial que le fait de cliquer sur le bouton "Ajouter" ajoutera dans la liste "LST_Personne" une ligne composée du nom "TXT_Nom" et du prénom "TXT_Prenom" séparés par un espace. Nous allons donc taper ce code :

Private Sub BOU_Ajouter_Click()
 Dim wLigne As String
 wLigne = TXT_Nom.Text & " " & TXT_Prenom.Text
 Call LST_Personnes.AddItem(wLigne)
End Sub

Explications sur le code :

La ligne Dim wLigne As String permet de déclarer une variable de type chaine de caractères (String) et dont le nom est "wLigne"

La ligne wLigne = TXT_Nom.Text & " " & TXT_Prenom.Text place dans la variable "wLigne" le nom saisi par l'utilisateur, plus un espace, plus le prénom.

Le ligne Call LST_Personnes.AddItem(wLigne) permet d'ajouter dans la liste "LST_Personnes" la chaine de caractères contenue dans la variable "wLigne"

Voilà, maintenant que nous avons tapé le code pour notre bouton "Ajouter", il ne nous reste plus qu'a tester le programme en réel.

Lancement du programme

Pour lancer le programme il faut tout d'abord avoir connecté votre Pocket PC à votre PC et qu'ActiveSync ait établi la liaison (un partenariat n'est pas obligatoire). Si vous voulez utiliser l'émulateur, il faut simplement le stipuler pour cible (au lieu de Pocket PC default device). Si vous utiliser le bouton [play] pour lancer le programme, vous activez aussi une session de débogage ce qui permet de tracer le fonctionnement du programme. Si vous ne voulez pas lancer de session de debogage, il vous suffit de choisir dans le menu "Run->Execute". Les touches de raccourci "F5" et "Ctrl F5" ont les mêmes fonctions.

Nous allons lancer notre programme par "Run->Execute" ou "Ctrl+F5".

Après toute une série de mises à jour (je vous rassure, eVB ne va pas le faire à chaque fois) votre programme se lance sur votre Pocket PC, et après utilisation ça donne :

Notre petit programme fait exactement ce qu'on lui a demandé. Pour l'arrêter, il vous suffit de cliquer sur le bouton (OK) de la fenêtre.

Conclusion de cette deuxième partie

Nous venons d'écrire notre premier petit programme en eVB. Nous allons voir dans la 3ème partie comment travailler avec le debugger.