Setup Example

image\head10.gif VB.NET

Dim Ret As Integer

Dim Fstb(32) As Integer

Dim i As Integer

 

Ret = GpDevFind(Fstb)

For i = 0 to 31

    If Fstb(i) = 255 Then

        Exit For

    End If

Next

' In this point, "i" is number of other devices

 

image\head10.gif C

DWORD Ret;

DWORD Fstb[32];

INT i;

 

Ret = GpDevFind(Fstb)

for(i = 0; i < 32; i++){

if(Fstb[i] == 255)

break;

}

// In this point, "i" is number of other devices

 

image\head10.gif C#

uint Ret;

uint[] Fstb = new uint[32];

int i;

 

Ret = gpib.DevFind(Fstb);

for(i = 0; i < 32; i++){

    if(Fstb[i] == 255)

        break;

}

// In this point, "i" is number of other devices

 

image\head10.gif Python

Ret = ctypes.c_ulong()

Fstb = (ctypes.c_ulong * 32)()

 

Ret.value = GpibPy.GpDevFind(Fstb)

for i in range(0, 32):

    if Fstb[i] == 255:

        break

# In this point, "i" is number of other devices