■VB.NET用
Dim Ret, Srlen, Cmd(31) As Integer
Dim Srbuf As String ' 受信バッファ
Cmd(0) = 2 ' トーカ+リスナ数(マスタモード時)
Cmd(1) = 3 ' トーカアドレス
Cmd(2) = 1 ' リスナアドレス
Srlen = 256 ' 最大受信可能バイト長
Ret = GpListen(Cmd, Srlen, Srbuf)
■C言語用
DWORD Ret, Srlen, Cmd[31];
BYTE Srbuf[256]; /* 受信バッファ */
Cmd[0] = 2; /* トーカ+リスナ数(マスタモード時)*/
Cmd[1] = 3; /* トーカアドレス */
Cmd[2] = 1; /* リスナアドレス */
Srlen = 256; /* 最大受信可能バイト長 */
Ret = GpListen(Cmd, &Srlen, Srbuf);
■C#用
uint Ret, Srlen;
uint[] Cmd = new uint[31];
StringBuilder Srbuf = new StringBuilder(256); /* 受信バッファ */
Cmd[0] = 2; /* トーカ+リスナ数(マスタモード時)*/
Cmd[1] = 3; /* トーカアドレス */
Cmd[2] = 1; /* リスナアドレス */
Srlen = 256; /* 最大受信可能バイト長 */
Ret = gpib.Listen(Cmd, out Srlen, Srbuf);
■Python用
Ret, Srlen, Cmd = ctypes.c_ulong(), ctypes.c_ulong(), (ctypes.c_ulong * 31)()
Srbuf = (ctypes.c_ubyte * 256)() # 受信バッファ
Cmd[0] = 2 # トーカ+リスナ数(マスタモード時)
Cmd[1] = 3 # トーカアドレス
Cmd[2] = 1 # リスナアドレス
Srlen.value = 256 # 最大受信可能バイト長
Ret.value = GpibPy.GpListen(Cmd, ctypes.byref(Srlen), Srbuf)