• Shl

Value = Shl ( Number , Bit )

ビット数だけ左にシフトした数値を返します。 数の符号は守られます。
Numberのタイプは、Byte、Short、Integer、またはLongのいずれかです。
Bitの有効範囲は、Number引数の型によって異なります。

Type of Number	Range of Bit
Byte	0...7
Short	0...15
Integer	0...31
Long	0...63

 

戻り値のデータ型はNumberのデータ型です。

Errors

Message	Description
Type mismatch (6)	Number引数のデータ型が無効です。
Bad argument (20)	Bit引数が範囲外です。

Examples

Print Bin(11, 32), 11
Print Bin(Shl(11, 2), 32), Shl(11, 2)
Print Bin(Shl(11, 28), 32), Shl(11, 28)

00000000000000000000000000001011 11
00000000000000000000000000101100 44
00110000000000000000000000000000 805306368

 

Print Bin(-11, 32), -11
Print Bin(Shl(-11, 2), 32), Shl(-11, 2)
Print Bin(Shl(-11, 28), 32), Shl(-11, 28)

11111111111111111111111111110101 -11
11111111111111111111111111010100 -44
11010000000000000000000000000000 -805306368

 

引数の型を拡張することは役に立つかもしれません。 このCLng、CInt、またはShortに使用します。

Dim b1 As Byte
Dim i1 As Integer
Dim i2 As Integer

b1 = &H55
' Bad Argument, maximum = 7 for Byte for Integer : s2 = Shl(b1, 8) OR b2
i1 = Shl(CInt(b1), 16)
Print "i1="; Hex$(i1)
i2 = Shl(b1, 16) ' Stops here with Bad Argument
Print " i2="; Hex$(i2)

i1=550000

See also

• Bits Manipulation Functions

• Logical Operators