■VB.NET用
Dim Ret As Integer
Dim Pad, Sad, Lstn As Short
Pad = 1 ' 1次アドレス=1
Sad = 0 ' 2次アドレス=なし
Ret = GpDevFindEx(Pad, Sad, Lstn)
■C言語用
DWORD Ret;
short Pad, Sad, Lstn;
Pad = 1; /* 1次アドレス=1 */
Sad = 0; /* 2次アドレス=なし */
Ret = GpDevFindEx(Pad, Sad, &Lstn);
■C#用
uint Ret;
short Pad, Sad, Lstn;
Pad = 1; /* 1次アドレス=1 */
Sad = 0; /* 2次アドレス=なし */
Ret = gpib.DevFindEx(Pad, Sad, out Lstn);
■Python用
Ret = ctypes.c_ulong()
Pad, Sad, Lstn = ctypes.c_short(), ctypes.c_short(), ctypes.c_short()
Pad.value = 1 # 1次アドレス=1
Sad.value = 0 # 2次アドレス=なし
Ret.value = GpibPy.GpDevFindEx(Pad, Sad, ctypes.byref(Lstn))