VB.NET
Dim Ret As Integer
Dim Str(8) As Byte
Dim DblData(1) As Double
Dim ArraySize As Integer
Str(0) = 63
Str(1) = 198
Str(2) = 127
Str(3) = 113
Str(4) = 97
Str(5) = 198
Str(6) = 148
Str(7) = 230
DblData(0) = 0
ArraySize = 1
Ret = GpCnvCvdArray(Str, DblData, ArraySize)
(Result)
DblData[0] : 0.175764248601957
C
DWORD Ret;
BYTE Str[8];
double DblData[1];
DWORD ArraySize;
Str[0] = 63;
Str[1] = 198;
Str[2] = 127;
Str[3] = 113;
Str[4] = 97;
Str[5] = 198;
Str[6] = 148;
Str[7] = 230;
DblData[0] = 0;
ArraySize = 1;
Ret = GpCnvCvdArray(Str, DblData, ArraySize);
(Result)
DblData[0] : 0.175764248601957
C#
uint Ret;
byte[] Str = new byte[8];
double[] DblData = new double[1];
uint ArraySize;
Str[0] = 63;
Str[1] = 198;
Str[2] = 127;
Str[3] = 113;
Str[4] = 97;
Str[5] = 198;
Str[6] = 148;
Str[7] = 230;
DblData[0] = 0;
ArraySize = 1;
Ret = gpib.CnvCvdArray(Str, DblData, ArraySize);
(Result)
DblData[0] : 0.175764248601957
Python
Ret = ctypes.c_ulong()
Str = (ctypes.c_ubyte * 8)()
DblData = (ctypes.c_double * 1)()
ArraySize = ctypes.c_ulong()
Str[0] = 63
Str[1] = 198
Str[2] = 127
Str[3] = 113
Str[4] = 97
Str[5] = 198
Str[6] = 148
Str[7] = 230
DblData[0] = 0
ArraySize.value = 1
Ret.value = GpibPy.GpCnvCvdArray(Str, DblData, ArraySize)
(Result)
DblData[0] : 0.175764248601957