Imports
Imports
Imports
Module Module1
Sub Main()
("The result of shifting the hexadecimal number 0x2F2E left by one is 0x{0}.", Hex(_rol_16_(&H2F2E)))
("The result of the hexadecimal number 0x2F2E loop left shifted one by one is 0x{0}.", Hex(_crol_16_(&H2F2E)))
("The result of shifting the hexadecimal number 0x2F2E by one right is 0x{0}.", Hex(_ror_16_(&H2F2E)))
("The result of the hexadecimal number 0x2F2E is moved right by one by one by one.", Hex(_croor_16_(&H2F2E)))
("The binary string of hexadecimal number 0xFE1A2D is {0}.", GetBinaryString(&HFE1A2D))
("The result of setting the 8th bit of hexadecimal number 0xFE1A2D to 1 is 0x{0}.", Hex(SetBitState(&HFE1A2D, 7, True)))
()
End Sub
End Module