I am trying to get a Phidget 1048_2B to select another channel however after I change the channel 0 to channel 1 I still get channel 0 values.
If I start at Channel 1 then change to Channel 0 I then get Channel 1 values for Channel 0. I even put in a delay routine thinking it needed more time. Even after 15 seconds it still does not change to a new channel reading.
Obviously I do not understand how to correctly change channels.
I am attaching my simple main code here.
Is there a command I need to call to force it to change channels ?
-----------------------------------------------------------
Private Sub ShowPhidget()
     Dim StartTime As Double
     StartTime = Microsoft.VisualBasic.DateAndTime.Timer
     TimerOut = StartTime + 2000
     Doit = True
     CurrentOperation1.Text = "Attach a PhidgetTemperatureSensor 1"
     Application.DoEvents()
     AdvTemp0 = New Phidget22.TemperatureSensor
     AdvTemp0.Open()
     While AdvTemp0.Attached = False And (TimerOut < Microsoft.VisualBasic.DateAndTime.Timer)
         If TimerOut >= TimerOut < Microsoft.VisualBasic.DateAndTime.Timer Then
             CurrentOperation1.Text = "Attach Timeout"
             Application.DoEvents()
             End
         End If
     End While
     CurrentOperation1.Text = "Attached"
     Application.DoEvents()
     AdvTemp0.Channel = 0
     AdvTemp0.IsLocal = True
     AdvTemp0.ThermocoupleType = ThermocoupleType.K
     CurrentOperation2.Text = "Attach a PhidgetTemperatureSensor 2"
     Application.DoEvents()
     Call Delay(0.15)
     While Doit = True
         AdvTemp0.Channel = 0
         Call Delay(0.15)
         Channel0 = AdvTemp0.Temperature
         Call Delay(0.15)
         Label1.Text = "Current Temperature 0 : " + Str(Channel0)
         Application.DoEvents()
         CurrentOperation2.Text = "Attached"
         Application.DoEvents()
         AdvTemp0.Channel = 1
         Call Delay(0.15)
         Channel1 = AdvTemp0.Temperature
         Call Delay(0.15)
         Application.DoEvents()
         Label2.Text = "Current Temperature 1 : " + Str(Channel1)
     End While
 End Sub
			
			
									
						
										
						