Hvordan Motta utgangssignalet i VB6 Ved hjelp av en parallellport

Hvordan Motta utgangssignalet i VB6 Ved hjelp av en parallellport


Visual Basic ikke direkte tilgang til maskinvare via programmeringskode. Derfor støtter den ikke parallellport-relaterte programmering. Men et bibliotek for dynamiske koblinger, eller DLL, heter WIN95IO.DLL er tilgjengelig for dette formålet. Parallellport består av tre forskjellige deler, inkludert dataledninger, styreledninger og statuslinjene. De datalinjer er de viktigste metoder for å skaffe informasjon ut av porten.

Bruksanvisning

1 Last ned DLL. Pakk ut filen og kopiere den til systemkatalogen Windows '.

2 Klikk "Start", "Alle programmer" og "Visual Basic 6" for å gå inn i integrerte utvikling grensesnitt. Klikk "Fil" og "New" for å opprette et nytt prosjekt. Angi et navn for prosjektet. Velg en plassering for prosjektfiler ved å klikke på "Bla gjennom".

3 Klikk "Form1.vb" på Solution Explorer. Klikk "Toolbox" og velg "Text Field" for å opprette en ny tekstfeltet. Systemet vil navnet i tekstfeltet "Text1" automatisk.

4 Dobbeltklikk skjemaet og taste inn koden grensesnitt. Erklærer følgende for å kunne bruke DLL:
Erklærer Sub vbOut Lib "WIN95IO.DLL" (ByVal nPort As Integer, ByVal nInnsamlede As Integer)
Erklærer Sub vbOutw Lib "WIN95IO.DLL" (ByVal nPort As Integer, ByVal nInnsamlede As Integer)
Erklærer Funksjon vbInp Lib "WIN95IO.DLL" (ByVal nPort As Integer) As Integer
Erklærer Funksjon vbInpw Lib "WIN95IO.DLL" (ByVal nPort As Integer) As Integer

5 Mottar signalet fra parallellporten gjennom vbInp metode. Tast inn koden mellom Sub og End Sub:
Dim sn As String

strin = "&H" & Text1.Text
vbInp &H378, strin

H378 er portadresse for datalinjer.