C++ code to vb

[jwgan]

Here have3 section
I face problem when change the code from c++ file to VB and anybody tell me what is the error that i face?

section 1: C++ code

struct instConfig
{
unsigned long instBitmap;
unsigned long scanIntvl_I1[4];
unsigned long scanIntvl_I2[4];
unsigned long scanIntvl_I3[4];
struct chanConfig channel [30];
struct tokBuf expTokBuf;
};
struct chanConfig
{
unsigned long chanType;
unsigned long range;
unsigned long diffChan;
float gen_float;
unsigned long gen_ulong;
unsigned long alarmBitmap;
float alarmLimit[2];
unsigned long dioline[2];
float m;
float b;
};
struct tokBuf
{
unsigned char bytes[CFG_TOKBUF_SIZE];
};

Section 2: VB Structure Code

Public Structure instConfig
Public instBitmap As Long
Public scanIntvl_I1() As Long
Public scanIntvl_I2() As Long
Public scanIntvl_I3() As Long
Public channel() As chanConfig
Public expTokBuf As tokBuf
End Structure
Public Structure chanConfig
Public chanType As Long
Public range As Long
Public diffChan As Long
Public gen_float As Decimal
Public gen_ulong As Long
Public alarmBitmap As Long
Public alarmLimit() As Decimal
Public dioline() As Long
Public m As Decimal
Public b As Decimal
End Structure
Public Structure tokBuf
Public bytes() As Byte
End Structure
Private Sub Reset_Structure()
Dim Inst_Config As instConfig = New instConfig
Dim Chan_Config As chanConfig = New chanConfig
Dim Tok_Buf As tokBuf = New tokBuf 
ReDim Inst_Config.scanIntvl_I1(3)
ReDim Inst_Config.scanIntvl_I2(3)
ReDim Inst_Config.scanIntvl_I3(3)
ReDim Inst_Config.channel(29)
ReDim Chan_Config.alarmLimit(2)
ReDim Chan_Config.dioline(2)
ReDim Tok_Buf.bytes(999)
Chan_Config.expTokBuf = DAQ_TokBu
End Sub

Section 3: Error Message

The parameter is incorrect. (Exception from HRESULT: 0x80070057 (E_INVALIDARG)

 

[jmcilhinney]

And where and when exactly does this error occur? Also, please use

 tags in fututre for increased readability.