cs_lnel
Messages postés13Date d'inscriptionmercredi 8 décembre 2004StatutMembreDernière intervention30 décembre 2004
-
19 déc. 2004 à 18:44
cs_lnel
Messages postés13Date d'inscriptionmercredi 8 décembre 2004StatutMembreDernière intervention30 décembre 2004
-
30 déc. 2004 à 19:53
bonjour
je veux faire tourner le moteur
mais je suis nul en programmation
avec ça le moteur ne tourne pas il vibre, la sequence est bonne mais trop rapide
Private Sub Command1_Click()
Dim i
For i = 0 To 1000
WriteByte Port, 1
WriteByte Port, 3
WriteByte Port, 2
WriteByte Port, 6
WriteByte Port, 4
WriteByte Port, 12
WriteByte Port, 8
WriteByte Port, 9
Next i
WriteByte Port, 0
End Sub
AnteManoclis
Messages postés154Date d'inscriptionjeudi 22 mai 2003StatutMembreDernière intervention 6 septembre 2007 30 déc. 2004 à 14:42
Bah l'ennui, c'est que la procéddure keydown n'est appelée que lorsque le focus est sur le contrôle, par conséquent, si le code est dans le keydown de la form et que t'as des boutons par exemple sur cette même form, la procédure ne sera pas appelée et donc le code ne s'exécutera pas.
cs_lnel
Messages postés13Date d'inscriptionmercredi 8 décembre 2004StatutMembreDernière intervention30 décembre 2004 30 déc. 2004 à 19:53
Salut
J'ais trouver la solution et ça marche avec le pave numérique
Moteur 1 :
6 pour la droite
4 pour la gauche
Moteur 2 :
8 pour le haut
2 pour le bas