Josh's Home

Something about Josh

Some Photo's Josh has taken

Just Weird Josh

The JFK Assassination

Visual Basic Programming

Links

Guest Book Page

Visual Basic Programming
I add my own scripts andother neat things here.
I have just started a Visual Basic class. I have used Qbasic before along with other programing languages.



  How to set port.
'set port to 00000000
vbOut 888, 0

You will need to Port #
set ports 10000000 1
01000000 2
00100000 4
00010000 8
10110000 11

vbOut 888, The Port # would need to be done for all of the ports




How to Enable Visual Basic to have control over your Parallel Port.
First you need the (VBASM.DLL) for 16 bit Visual Basic. If you have a 32 bit Verision then you need (WIN95IO.DLL) before you download the .DLL file search your system for it. If you have the file it should be in the windows/system folder of your system.

Click here to download the .DLL files

The Declare scripts to use your Parallel port.
16 bit Visual Basic

Declare Function vbInp Lib "VBASM.DLL" (ByVal nPort As Integer) As Integer
Declare Sub vbOut Lib "VBASM.DLL" (ByVal nPort As Integer, ByVal nData As Integer)


32 bit Visual Basic

Declare Sub vbOut Lib "WIN95IO.DLL" (ByVal nPort As Integer, ByVal nData As Integer)
Declare Sub vbOutw Lib "WIN95IO.DLL" (ByVal nPort As Integer, ByVal nData As Integer)
Declare Function vbInp Lib "WIN95IO.DLL" (ByVal nPort As Integer) As Integer
Declare Function vbInp Lib "WIN95IO.DLL" (ByVal nPort As Integer) As Integer