Public Function InitEprobe(ByVal strGpib As String, ByVal Type As String) ioMgr = New Ivi.Visa.Interop.ResourceManager instrEprobe = New Ivi.Visa.Interop.FormattedIO488 instrEprobe.IO = ioMgr.Open("GPIB0::" & strGpib) 'set GPIBport instrEprobe.WriteString("I") 'Send command to instrument Return = instrEprobe.ReadString 'Read instrument End Function
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)