CodeMercs Forum

Danke für die schnelle Hilfe.
Klappt einwandfrei.
MfG Hank

Hallo zusammen,
ich arbeite mit einer digitalen Eingangskarte IO16USB 1.5 von Hoffmann und Visual BASIC.
Funktioniert auch, aber ....

bei Aufruf von ReadButton_Click wird der Programmlauf unterbrochen und auf den
nächsten Schaltvorgang gewartet.

Gibt es eine Möglichkeit die Eingangszustände ...

Vielen Dank für die schnelle Hilfe.
Hat alles wunderbar funktionert.
MfG Hank

Hi, hier der Quellcode.
Falls es eine andere Routine (in VB) gibt mit der ich die
zehn Relais schalten kann ... nehme ich gerne.
Schon mal vielen Dank.
MfG Hank

Dim iowHandles(IOWKIT_MAX_DEVICES) As Long' IO-Warrior handles
Dim numIows As Long' Number of IOWs
Dim data(8) As Byte' Basic data buffer ...

Hi, hier sind noch ein Paar Infos.
Die Karte ist von GWR.
Der Code ist in Visual Basic.
Der Aufruf von "WriteLEDs(Value As Byte)" verlangt nur ein Byte.

Hallo zusammen,
ich habe eine 10 Kanal USB Relaiskarte RK10-05USBV1.

die Relais 1 bis 8 kann ich ansteuern.
z. B. so :
z=RND
Call WriteLEDs(Int(256*z) AND &HFF)

aber ... mit welchem Befehlscode steuer ich die Relais 9 und 10 an ?
Kann mir da jemand helfen ?
MfG Hank