Étape 3: programme de Visual basic 6.0
faire le formulaire illustré dans l’image
Programme pour Visual basic 6 (voyant allumé hors contrôle logiciel)
Private Sub EXIT_Click()
Form1.Hide
End Sub
Private Sub Form_Load()
MSComm1.RThreshold = 3
MSComm1.Settings = « 9600, n, 8, 1 »
MSComm1.CommPort = 2 / / (écrire le numéro de Port sur lequel votre carte Arduino est disponible).
MSComm1.PortOpen = True
MSComm1.DTREnable = False
Text1.Text = ""
Shape1.FillColor = vbRed
End Sub
Private Sub TURNOFF_Click()
MSComm1.Output = « b »
Text1.Text = « Est éteint »
Shape1.FillColor = vbRed
End Sub
Private Sub TURNON_Click()
MSComm1.Output = « a »
Text1.Text = « LED s’allume »
Shape1.FillColor = vbGreen
End Sub