Προγραμματισμός

* Γνώση Υπολογιστών >> Προγραμματισμός >> Visual Βασικά Προγραμματισμός

Πώς να διαβάσετε ένα Joystick USB σε Visual Basic

Διαβάζοντας τα δεδομένα από μια Universal Serial Bus ( USB ) joystick ή κίνηση αντίχειρων είναι δυνατή με τη Microsoft Visual Basic ( VB ) . Οι συσκευές USB είναι η αυτο - προσδιορισμό και plug- and-play συμβατό , ένα υπολογιστικό σύστημα είναι σε θέση να αναγνωρίζουν εύκολα . Το γεγονός αυτό καθιστά το γράψιμο ένα μικρό κομμάτι του κώδικα VB να στείλει ένα πακέτο και να ανακτήσετε τα δεδομένα της συσκευής USB εύκολο . Στέλνοντας ένα πακέτο στο λιμάνι είναι απαραίτητη , καθώς θα ανιχνεύει την κατάσταση του λιμανιού και να στείλει πίσω όλα τα δεδομένα βρίσκονται στη συσκευή USB . Αν δεν υπάρχει συσκευή USB στη θύρα , τότε εμφανίζεται ένα μήνυμα σφάλματος . Οδηγίες
Η

1 Ανοίξτε ένα νέο αρχείο VB . 2

Ρυθμίστε τη λειτουργία SendPacket . Γράψτε τον κωδικό αυτό στην κορυφή του αρχείου VB σας :

SendPacket Λειτουργία ( ByRef TxPacket Όπως PacketStructure ) Όπως PacketStructure

Dim lpResult Όπως Long

Dim RxPacket Όπως PacketStructure

Η

3 Ρυθμίστε τον παραλήπτη και το μοντέλο της συσκευής εισάγοντας τον κωδικό αυτό στην πέμπτη γραμμή :

TxPacket.Recipient = 8

TxPacket.DeviceModel = 18
Φτηνές 4

Καλέστε τη λειτουργία SendPacket στον κώδικα VB . Γράψτε τον παρακάτω κώδικα αρχής γενομένης από την ένατη γραμμή :

Αν 0 = DeviceIoControl ( hDevice , CTL_CODE_SEND_PACKET , TxPacket , πώληση

8 + TxPacket.Length , RxPacket , 8 , lpResult , 0 ) Στη συνέχεια,

MsgBox " SendPacket λειτουργία απέτυχε . δεν είναι δυνατή η ανάκτηση δεδομένων USB . "

λειτουργία Έξοδος

End If
5

Τηλεφωνική τα δεδομένα που έχουν ανακτηθεί με την SendPacket λειτουργία . Τοποθετήστε αυτόν τον κώδικα στο κάτω μέρος του σεναρίου VB σας : .

SendPacket = RxPacket

End Function
Η

6 Τοποθετήστε το USB Joystick σας στη θύρα USB του υπολογιστή
Σελίδα 7

μεταγλώττισης και να εκτελέσει το σενάριο VB σας . Τα δεδομένα ανακτώνται στη μνήμη του προγράμματος , το οποίο μπορείτε να χρησιμοποιήσετε για άλλες λύσεις και τις ανάγκες του προγραμματισμού .
Η
εικόνων

Συναφής σύστασή

Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα