|
BitSHL, BitSHR
(XAPI2000)
Deklaration VB 6.0
Sub BitSHL (X As Long, ByVal Count As Long)
Sub BitSHR (X As Long, ByVal Count As Long)
Deklaration VB.NET
Sub BitSHL (ByRef X As Integer, ByVal Count As Integer)
Sub BitSHR (ByRef X As Integer, ByVal Count As Integer)
Beskrivning
Två funktioner som skiftar bitarna i ett tal till vänster eller
höger. Funktionen BitSHL skiftar åt vänster och BitSHR
åt höger. Parametern X innehåller det 32-bitars tal som ska
modifieras och parametern Count anger hur många steg som
bitarna ska skiftas.
Se även
BitROL, BitROR
|
Exempel (VB 6.0)
Dim X As Long
X = 3
BitSHL X, 4 ' Skifta 4 steg åt vänster,
ger X = 48
BitSHR X, 4 ' Skifta 4 steg åt
höger, ger X = 3 igen
Exempel (VB.NET)
Dim X As Integer
X = 3
BitSHL(X, 4) ' Skifta 4 steg åt vänster,
ger X = 48
BitSHR(X, 4) ' Skifta 4 steg åt
höger, ger X = 3 igen
|
