VB Differential Readings

Post general discussions on using our drivers to write your own software here
Post Reply

VB Differential Readings

Post by FAM » Thu Oct 14, 2004 11:25 am

The code below is provided by Pico for use with the ADC-16, which it works fine but i would just like it just to read the differential channels (i.e. 1,3,5&7) but its currently also reading 2,4,6&8.
Any suggestions :?:
Thanks in Advance

Private Sub Open_Click()
List1.AddItem ("Opening...")

ok% = adc16_open_unit(port)
If ok% > 0 Then
List1.AddItem ("Opened")
Opened = True
For ch = 1 To 8
ok% = adc16_set_channel(port, ch, 16, 0, 10)
Next ch
Opened = False
List1.AddItem ("Can't open unit")
End If
End Sub


Post by FAM » Fri Oct 15, 2004 1:18 pm

FYI, Got it sorted with amending the line to,

For ch = 1 to 8 STEP 2

Post Reply