Πώς να λάβετε το σήμα εξόδου σε VB6 Χρησιμοποιώντας μια παράλληλη θύρα

Visual Basic δεν έχουν άμεση πρόσβαση στον ηλεκτρονικό εξοπλισμό μέσω κώδικα προγραμματισμού . Ως εκ τούτου , δεν υποστηρίζει παράλληλη θύρα προγραμματισμού που σχετίζονται με . Ωστόσο , μια βιβλιοθήκη δυναμικής σύνδεσης ή DLL , που ονομάζεται WIN95IO.DLL είναι διαθέσιμα για το σκοπό αυτό . Η παράλληλη θύρα αποτελείται από τρία διαφορετικά τμήματα , συμπεριλαμβανομένων των γραμμών δεδομένων , γραμμές ελέγχου και γραμμές κατάστασης . Οι γραμμές δεδομένων είναι οι κύριες μέθοδοι για την απόκτηση πληροφοριών έξω από το λιμάνι . Τα πράγματα που θα χρειαστείτε
Visual Basic
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

Κατεβάστε το αρχείο DLL . Αποσυμπιέστε το αρχείο και αντιγράψτε το στον κατάλογο συστήματος των Windows . 2

Κάντε κλικ στο " Έναρξη", " Όλα τα προγράμματα " και " Visual Basic 6 " για να μπείτε στο ολοκληρωμένο περιβάλλον ανάπτυξης . Κάντε κλικ στο " Αρχείο" και " Νέο" για να δημιουργήσετε ένα νέο έργο . Καθορίστε ένα όνομα για το έργο . Επιλέξτε μια θέση για τα αρχεία του έργου κάνοντας κλικ στο " Αναζήτηση ".
Εικόνων 3

Κάντε κλικ στο " Form1.vb " στην Εξερεύνηση λύση . Κάντε κλικ στο " Toolbox" και επιλέξτε " Πεδίο κειμένου " για να δημιουργήσετε ένα νέο πεδίο κειμένου . Το σύστημα θα ονομάσουν το πεδίο κειμένου " Κείμενο1 " αυτόματα .
Η 4

διπλό κλικ στη φόρμα και πληκτρολογήστε τον κωδικό interface . Δηλώστε το παρακάτω, για να είναι σε θέση να χρησιμοποιήσει το DLL : Declare Sub vbOut Lib " WIN95IO.DLL " ( ByVal nPort As Integer , ByVal nΤα δεδομένα As Integer ) να αναγνωρίσει Sub vbOutw Lib " WIN95IO.DLL " ( ByVal nPort As Integer , ByVal nΤα δεδομένα As Integer ) να αναγνωρίσει Λειτουργία vbInp Lib " WIN95IO.DLL " ( ByVal nPort As Integer ) Όπως IntegerDeclare Λειτουργία vbInpw Lib " WIN95IO.DLL " ( ByVal nPort As Integer ) As Integer
5

λάβετε σήμα από την παράλληλη θύρα μέσω της μεθόδου vbInp . Εισάγετε τον κωδικό μεταξύ Sub και End Sub : Dim αυστη Όπως Stringstrin = " & H" & Text1.TextvbInp & H378 , strinH378 είναι η διεύθυνση θύρας για τις γραμμές δεδομένων

Η .