[Plan du site] Vous êtes ici --- > Le Site du Zéro > Les tutoriels > Non-Officiels > Programmation > Basic et dérivés > VisualBasic > VB6.0 et le port série > Lecture du tutoriel

VB6.0 et le port série

Vous vous apprêtez à lire un tutoriel rédigé par un membre de ce site. Malgré tout le soin que ce membre a pu apporter au tutoriel, nous ne pouvons pas garantir que les informations contenues sur cette page sont exactes à 100%. Merci de garder cela en tête lorsque vous lirez cette page ;o)

Je vais essayer de vous présenter ici la manière d'utiliser le port série de votre ordinateur avec Visual Basic 6.0. Normalement, à la fin de ce tuto, vous devriez être en mesure de réaliser une application capable de dialoguer en utilisant la norme RS-232 que je vous ai présentée dans mon premier tuto.

Sommaire du tutoriel :

Comment permettre à mon application d'utiliser le port série ?
Comment envoyer des données ?
Comment recevoir des données ?

Comment permettre à mon application d'utiliser le port série ?

Pour utiliser le port série de votre ordinateur avec Visual Basic, il vous faut donc commencer par lancer... Visual Basic (ça, je pense que vous vous en doutiez

). Ensuite, ouvrez un nouveau projet. Puis (c'est là que ça se complique) il va falloir aller chercher le composant qui permet la gestion du port série par Visual Basic. Pour cela, allez dans le menu "Projet", puis cliquez sur "Composants...". A ce moment, cette fenêtre devrait s'ouvrir :

Cochez la case "Microsoft Comm Control 6.0" comme sur l'image ci-dessus, puis validez en cliquant sur "OK".
Désormais, vous devez voir cette icône dans la barre d'outils de l'environnement de développement : Image utilisateur

. Placez ce composant sur la feuille principale de votre application, et celle-ci pourra communiquer via le port série. Personnellement, je lui attribue le nom "MSComm" dans ses propriétés.

Comment envoyer des données ?

Nous allons maintenant voir le code permettant d'émettre et de recevoir des données en utilisant le composant que nous venons de mettre en place. Le plus simple est que je vous mette directement le code avec quelques commentaires. Voici donc le code pour envoyer des informations (j'ai créé un bouton cmdEnvoi sur lequel je clique pour envoyer les données) :
Code : Autre

Private Sub cmdEnvoi_Click()
 MSComm.CommPort = 1 'On définit le port série qui sera utilisé (ici Port 1)
 MSComm.Settings = "4800,n,8,1" 'On définit ici les paramètres de transmission (je les explique dans un instant).
 MSComm.PortOpen = True 'Ici on ouvre le port de communication
 MSComm.Output = "M" 'Maintenant on envoie nos informations, ici le caractère "M"
 MSComm.PortOpen = False 'Et pour finir on ferme le port de communication
End Sub

Oui, alors ces paramètres de transmission : il s'agit des paramètres de la norme RS-232 (si vous ne connaissez pas cette norme, reportez-vous à mon premier tuto). "4800" représente la vitesse en bauds (bits par seconde), le "n" (pour none) signifie qu'il n'y a aucun bit de parité, le "8" que la transmission se fait sur huit bits, et le dernier chiffre est le nombre de bits de Stop (ici, un seul).
Voilà : vous savez désormais envoyer des informations sur le port série de votre ordinateur avec Visual Basic.

Comment recevoir des données ?

Maintenant, nous allons voir comment recevoir des données. Voici le code :
Code : Autre

Dim Tampon As String 'Déclaration des variables utiles
 
Private Sub MSComm_OnComm() 'On attend une activité sur le port
Select Case MSComm.CommEvent 'On détermine de quel type d'activité il s'agit
Case comEvReceive 'S'il s'agit de la réception de données...
Tampon = MSComm.Input '...on les stocke dans notre variable
End Select
End Sub

Et voilà : maintenant vous avez récupéré vos données dans une chaîne de caractères, vous pouvez en faire ce que vous voulez. Il faut bien sûr avoir au préalable paramétré le port de communication de la même manière que pour l'envoi de données (vitesse, parité, etc.) et l'avoir également ouvert, sinon rien ne peut arriver

Et voilà ! Désormais, vous êtes capable de faire dialoguer votre PC avec tout un monde de périphériques existants ou que vous pouvez fabriquer vous-mêmes.

Tutoriels

Communauté

Mon compte

Recherche

Livre d'or

Publicité

VB6.0 et le port série

Comment permettre à mon application d'utiliser le port série ?

Comment envoyer des données ?

Comment recevoir des données ?

	Auteur : Vostock Note : 18 / 20 (5 votes) Visualisations : 32 477 Plus d'informations Créé : le 30/12/2005 à 21:08:34 Modifié : le 22/08/2008 à 16:07:33 Avancement : 100% Licence : Creative Commons BY