VB Differential Readings

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

VB Differential Readings

Post by FAM »

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.Clear
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
Else
Opened = False
List1.AddItem ("Can't open unit")
End If
End Sub

FAM

Post by FAM »

FYI, Got it sorted with amending the line to,

For ch = 1 to 8 STEP 2

Post Reply