Πώς να διαβάσετε COM Port Μέχρι ένας ειδικός χαρακτήρας Πέρασε Visual Basic

; θύρα COM ενός υπολογιστή σας επιτρέπει να συνδέσετε εξωτερικές συσκευές, όπως ένα μόντεμ και να διαβάσει δεδομένα μεταφέρονται από την εν λόγω συσκευή . Πρέπει να συνδεθείτε με το λιμάνι από το πρόγραμμα της Visual Basic σας και να διαβάσετε τα δεδομένα σε μια σειρά , ώστε να μπορείτε να προσδιορίσετε αν ο ειδικός χαρακτήρας εισάγεται. Μπορείτε να χρησιμοποιήσετε το " while" για να συνεχίσετε την ανάγνωση μέχρι το χαρακτήρα βρίσκεται στη συμβολοσειρά . Οδηγίες
Η

1 Ανοίξτε το λογισμικό Visual Basic και να ανοίξει το πρόγραμμα στο οποίο θέλετε να συνδεθείτε και να ανακτήσετε τις πληροφορίες της θύρας COM . 2

Δημιουργήστε τη μεταβλητή θύρα COM και να προετοιμάσει το κλάσης που περιέχει τις θύρα COM επικοινωνιών . Ο παρακάτω κώδικας δημιουργεί τη μεταβλητή :

Δημ. com όπως η Νέα Rs232 ( )
εικόνων 3

Ρυθμίστε τις παραμέτρους της θύρας COM και ανοίξτε τη θύρα . Αφού ανοίξει το λιμάνι , είναι έτοιμα για τη συμβολή σας . Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα :

Με com.Port = 1.BaudRate = 2400.DataBit = 8.StopBit = Rs232.DataStopBit.StopBit_1.Parity = Rs232.DataParity.Parity_None.Timeout = 500End Withcom.Open ( )
Η

4 Ρυθμίστε το βρόχο , ενώ σε βρόχο μέσω κάθε χαρακτήρα μέχρι να βρεθεί ένας ειδικός χαρακτήρας . Ο ακόλουθος κώδικας διέρχεται μέσω κάθε χαρακτήρα μέχρι να βρεθεί ο χαρακτήρας " Μ " :

Ενώ str <> " M " moRS232.Read ( 10 ) Dim str ως String = com.InputStreamStringEnd Ενώ


Η