vb.net structure 定义静态数组

Const RAS95_MaxEntryName = 256 Const RAS95_MaxDeviceName = 128 Const RAS_MaxDeviceType = 16 Structure RASCONN95 Public dwSize As Long Public hRasConn As Long Public szEntryName() As Byte Public szDeviceType() As Byte Public szDeviceName() As Byte Sub Initialize() ReDim szEntryName(RAS95_MaxEntryName) ReDim szDeviceType(RAS_MaxDeviceType) ReDim szDeviceName(RAS95_MaxDeviceName) End Sub End Structure 然后声明时： dim rs as new RASCONN95 rs.Initialize