熟悉VB.net和C#的朋友,請指點.

Question

好象没有移位运算符，你可以自己通过方法实现：比如右移：
function RightMove(Source as integer,bits as integer)as integer
    Dim DivideBy as Integer=1
    for i=1 to bits
        DividedBy=DivideBy*2
    Next i
    RightMove=Source\DivideBy
end function左移：
function LeftMove(Source as integer,bits as integer)as integer
    Dim DivideBy as Integer=1
    for i=1 to 32-bits
        DividedBy=DivideBy*2
    Next i
    DivideBy=DivideBy-1
    DivideBy=0 XOR DivideBy
    DivideBy=DivideBy AND Source
    for i=1 to bits
        DivideBy=DivideBy*2
    Next
    LeftMove=DivideBy
end function
以上需要进行错误处理。