C# 转 VB代码， 谢谢

[ZoeToString]

ulong big2little(int code) //将big位序转换为little位序
{
ulong value;
value = ((((ulong)(code)&(ulong)0x000000ffUL)<<24)|(((ulong)(code)&(ulong)0x0000ff00UL)<<8)|(((ulong)(code)&(ulong)0x00ff0000UL)>>8)|(((ulong)(code)&(ulong)0xff000000UL)>>24));
return value;
}



谁能帮忙把这个方法 专程VB语言？？ 谢谢

[threenewbee]

将强制类型转换写成 CType()，运算符 & 变成 and，| 变成 or。类型调整为CLR类型。

[兔子-顾问]

Private Function big2little(code As Integer) As ULong
'将big位序转换为little位序
	Dim value As ULong
	value = (((CULng(code) And CULng(&HffUL)) << 24) Or ((CULng(code) And CULng(&Hff00UL)) << 8) Or ((CULng(code) And CULng(&Hff0000UL)) >> 8) Or ((CULng(code) And CULng(&Hff000000UL)) >> 24))
	Return value
End Function

转换工具
http://www.developerfusion.com/tools/convert/csharp-to-vb/

[colorall]

[Quote=引用 1 楼 caozhy 的回复:]
将强制类型转换写成 CType()，运算符 & 变成 and，| 变成 or。类型调整为CLR类型。
[/Quote]

        Function big2little(ByVal code As System.Int32) As System.UInt64
        Dim value As System.UInt64
        value = _
        ((CType(code, System.UInt64) And CType(&HFFUI, System.UInt64)) << 24) _
        Or ((CType(code, System.UInt64) And CType(&HFF00UI, System.UInt64)) << 8) _
        Or ((CType(code, System.UInt64) And CType(&HFF0000, System.UInt64)) >> 8) _
        Or ((CType(code, System.UInt64) And CType(&HFF000000UI, System.UInt64)) >> 24)
        Return value
    End Function