Hallo!

http://www.geekhideout.com/iodll.shtml

So, auf dieser Seite holst du dir die IO.DLL für VisualBasic!
Dann in VB gibst du folgendes ein:

Private Declare Sub PortOut Lib "IO.DLL" (ByVal Port As Integer, ByVal Data As Byte)

//Damit deklarierst du die "PortOut" Funktion mit Link auf die Library "IO.DLL"


PortOut (632), 0
//Damit setzt du den Port "632" (= h&278 , kommt drauf an welchen Port du ansprechen willst) auf 0 (alles aus)

Mit
PortOut (632), 255
sind alle Datenports auf 1

Mit freundlichen Grüßen,
ShadowPhoenix