操作符 Shr= （右移和赋值）
 
向右移动并为变量赋值

语法

Declare Operator Shr= ( ByRef lhs As Integer, ByRef rhs As Integer )
Declare Operator Shr= ( ByRef lhs As UInteger, ByRef rhs As UInteger )
Declare Operator Shr= ( ByRef lhs As LongInt, ByRef rhs As LongInt )
Declare Operator Shr= ( ByRef lhs As ULongInt, ByRef rhs As ULongInt )

用法

lhs shr= rhs

参数

lhs
要赋值的变量。
rhs
值lhs 的值。

说明

该操作符将其左侧（lhs ）参数的位移动其右侧（rhs ）参数指定的次数，并将结果赋值给lhs .它在功能上等同于：

lhs = lhs Shr rhs

对于用户定义的类型，此运算符可能会重载。

例子

Dim i As Integer
i = &b00011000   ''= 24
i Shr= 3         ''= i\2^3
''结果：11 3 3
Print Bin(i), i, 24\2^3
Sleep


方言差异

  • 在-lang qb 方言中不可用，除非使用别名__Shr =引用。

与QB差别

  • 新的FreeBASIC

参考