Sterowanie 2 silników z LPT w VB

Witajcie jak sterować portem LPT
tak żeby można było sterować dwoma silnikami krokowymi
Lpt ma port 0-7 8 pinów, do sterowania silnika wystarczy cztery
pozostałe cztery chciałem wykorzystać do sterowania drugim silnikiem
ale jak to zroić jednocześnie???
tak aby jakoś podzielić port na dwa??? 0-3 jeden silnik 4-7 drugi

TO do sterowania jednego silnika

Private Sub cmdkoniec_Click()
xx = sld.Value
Label1 = xx

For i = 1 To xx
Out PortAddress1, 0
krok = krok + 1
If krok = 5 Then
krok = 1
Out PortAddress, 0
End If
step 'wykonanie kroku
Next i

End Sub


Private Sub step()
' system sterowania pełno krokowy
If krok = 1 Then
Out PortAddress, 10
End If
If krok = 2 Then
Out PortAddress, 6
End If
If krok = 3 Then
Out PortAddress, 5
End If
If krok = 4 Then
Out PortAddress, 9
End If
Sleep 3
End Sub

nie lepiej zastosowac ci sterownikow ? bedziesz wtedy potrzebowac 2 piny do sterowania pozatym latwiej jest to rozwiazac programowo wystarczy stworzyc petle i ustawic predkosc jednego do drugiego silnika stosunkowo przykladowo jezeli silnik A ma wykonac 10 krokow a silnik B ma wykonac 1 to niech petla bedzie do 10 i if i = 10 then ... ( krok dla b )