Πώς να λάβετε Bytes από μια σειριακή θύρα χρήση της Visual Basic

ανάγνωση δεδομένων από μια συσκευή που συνδέεται στη σειριακή θύρα του υπολογιστή έχει γίνει ένα εύκολο έργο σε Visual Basic . Χρησιμοποιώντας μόνο λίγες βασικές εντολές στην ενσωματωμένη βιβλιοθήκη , μπορείτε να γράψετε τις δικές σας εφαρμογές VB για την αντιμετώπιση των εξωτερικών περιφερειακά που έχετε αγοράσει ή να σχεδιάσετε μόνοι σας . Τα πράγματα που θα χρειαστείτε
Visual Basic 2008
Η Εμφάνιση Περισσότερες οδηγίες
Η

1 Δημιουργήστε ένα νέο έργο . Ονομάστε το έργο σας "Serial Port Tutorial Reading " ή να δώσει κάποιο άλλο κατάλληλο όνομα . Σε άλλα παράθυρα διαλόγου , απλά επιλέξτε τις προεπιλεγμένες επιλογές μέχρι να βρείτε τον εαυτό σας αντιμετωπίζουν με το κενό παράθυρο του " Graphical User Interface " ( GUI ) σχεδιαστών . 2

Προσθέστε ένα κουμπί από τη λίστα συστατικών στην η αριστερή πλευρά σύροντάς το στη φόρμα . Ενώ το κουμπί εξακολουθεί να είναι επιλεγμένο , μεταβείτε στη λίστα ιδιότητες και βρείτε το " κείμενο" ιδιοκτησίας. Αλλάξτε αυτή ως εξής: " Διαβάστε 100 bytes από την COM1 " ή οποιαδήποτε άλλη κατάλληλη λεζάντα που θέλετε να δώσετε .
Εικόνων 3

Κάντε διπλό κλικ στο κουμπί . Αυτό θα σας μεταφέρει από το σχεδιαστή GUI και στο πρόγραμμα επεξεργασίας πηγαίου κώδικα . Θα δημιουργήσει επίσης μια λειτουργία γεγονός να συμβεί κάθε φορά που κάνετε κλικ στο κουμπί από το χρήστη
Η 4

Προσθέστε τον ακόλουθο κώδικα στη λειτουργία κλικ το κουμπί Visual Basic που μόλις δημιουργήσατε για εσάς : .

Dim COM1 Όπως IO.Ports.SerialPortcom1 = My.Computer.Ports.OpenSerialPort ( " COM1 " )

Dim δεδομένων ( 100 ) Όπως Byte ( ) com1.read (δεδομένα , 0 , 100 )

τα επιχειρήματα για τη λειτουργία ανάγνωσης αναφέρεται σε μια σειρά από bytes για να γράψει τα δεδομένα σε , το ποσό για την αντιστάθμιση πριν από την ανάγνωση και , τέλος , το ποσό για να διαβάσετε από το λιμάνι . Σε αυτή την περίπτωση , θέλουμε τα δεδομένα τοποθετούνται σε πίνακα Byte δεδομένων έχουμε κηρύξει . Θέλουμε να ξεκινήσει από την αρχή της ροής δεδομένων από τη σειριακή θύρα , έτσι αντισταθμίζεται μας είναι μηδέν . Και τέλος , θέλουμε να διαβάσουμε το πολύ εκατό bytes , αφού αυτό είναι το πώς μεγάλη ποικιλία δεδομένων μας .

Τώρα έχετε διαβάσει εκατοντάδες bytes από μια σειριακή θύρα και να τα χρησιμοποιήσετε στην εφαρμογή σας , όπως σας το δοκούν .
Η
εικόνων