如何将此段代码转换为vb.net

[isage2002]

private static unsafe uint test(void* pVoid0, uint uint0)
{
if (BitConverter.IsLittleEndian)
{
return *(((uint*) pVoid0));
}
byte* numPtr = (byte*) pVoid0;
switch (uint0)
{
case 1:
return numPtr[0];

case 2:
return (uint) (numPtr[0] | (numPtr[1] << 8));

case 3:
return (uint) ((numPtr[0] | (numPtr[1] << 8)) | (numPtr[2] << 0x10));

case 4:
return (uint) (((numPtr[0] | (numPtr[1] << 8)) | (numPtr[2] << 0x10)) | (numPtr[3] << 0x18));
}
return 0;
}
因对于指针不是很了解，此段代码该如何转换

[isage2002]

有偿回答，可私聊，q77080862

[isage2002]

楼上的是机器转码，报错

[「已注销」]

供参考： Private Shared Function test(pVoid0 As Pointer(Of System.Void), uint0 As UInteger) As UInteger If BitConverter.IsLittleEndian Then Return CType(pVoid0, Pointer(Of UInteger)).Target End If Dim numPtr As Pointer(Of Byte) = CType(pVoid0, Pointer(Of Byte)) Select Case uint0 Case 1 Return numPtr(0) Case 2 Return CUInt(numPtr(0) Or (numPtr(1) << 8)) Case 3 Return CUInt((numPtr(0) Or (numPtr(1) << 8)) Or (numPtr(2) << &H10)) Case 4 Return CUInt(((numPtr(0) Or (numPtr(1) << 8)) Or (numPtr(2) << &H10)) Or (numPtr(3) << &H18)) End Select Return 0 End Function