numero >> cantidad bits de corrimiento
ejemplo:
16 >> 2
o del Desplazamiento de Bits a la Izquierda (<<)
numero << cantidad bits de corrimiento
ejemplo:
16 << 2
podemos utilizar un código como el que sigue:
Public Sub Main()
Dim s As String
Dim i As Integer
' Insertamos como texto un ejemplo de C de desplazamiento de Bit a la Izquierda:
s = "16 << 3"
i = Desplazamiento(s)
Print i
End
Private Function Desplazamiento(ds As String) As Integer
Dim ris As Integer
Dim ss As String[]
ss = Scan(ds, "* * *")
Select Case Trim(ss[1])
Case "<<"
ris = Val(Trim(ss[0])) * (2 ^ Val(Trim(ss[2])))
Case ">>"
ris = Val(Trim(ss[0])) \ CInt(2 ^ Val(Trim(ss[2])))
End Select
Return ris
End
Dim s As String
Dim i As Integer
' Insertamos como texto un ejemplo de C de desplazamiento de Bit a la Izquierda:
s = "16 << 3"
i = Desplazamiento(s)
Print i
End
Private Function Desplazamiento(ds As String) As Integer
Dim ris As Integer
Dim ss As String[]
ss = Scan(ds, "* * *")
Select Case Trim(ss[1])
Case "<<"
ris = Val(Trim(ss[0])) * (2 ^ Val(Trim(ss[2])))
Case ">>"
ris = Val(Trim(ss[0])) \ CInt(2 ^ Val(Trim(ss[2])))
End Select
Return ris
End