对位模式执行数学左移位.
result = pattern amount
各部分说明
result
必选.整型数值.对该位模式进行移位的结果.数据类型与 pattern 的数据类型相同.
pattern
必选.整型数值表达式.要进行移位的位模式.数据类型必须为整型(SByte、Byte、Short、UShort、Integer、UInteger、Long 或 ULong).
amount
必选.数值表达式.要将该位模式移位的位数.数据类型必须为 Integer 或扩展到 Integer.
备注
数学移位不是循环的,即不会将在结果的一端移出的数位从另一端重新移入.在数学左移位运算中,丢弃移出结果数据类型范围的数位,而将右端空出的数位位置设置为零.
为防止移位的结果超出它所支持的位数,Visual Basic 使用与 pattern 的数据类型相对应的大小掩码来屏蔽 amount 的值.可使用这些值的二进制与运算结果作为移位量.大小掩码如下所示:
pattern数据类型 掩码(十进制)掩码(十六进制)
如果 amount 为零,则 result 的值与 pattern 的值相同.如果 amount 为负值,则将把它作为无符号的值,并使用相应的大小掩码进行屏蔽.
数学移位绝不会产生溢出异常.
①.左移10位,1后面加10个0
结果就是:10000000000
第五段:按位运算符
注意不能在VB.Net中直接使用以下二进制数,使用时需转换为相应的十六或十进制数字.
Public Class Form1
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Me.Text = "选项移动"
ListBox1.SelectionMode = SelectionMode.MultiSimple
For i = 1 To 10
ListBox1.Items.Add(Chr(Asc("a") + i - 1))
Next
End Sub
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
If ListBox1.SelectedItems Is Nothing Then Exit Sub
Dim b As ListBox.ObjectCollection
For i = 0 To Me.ListBox1.SelectedItems.Count - 1
Me.ListBox1.Items.RemoveAt(Me.ListBox1.SelectedIndices(0))
End If
For Each itm As Object In ListBox1.Items
ListBox1.Items.Clear()
ListBox1.Items.Add(itm)
End Class
VB中没有,VB.net是可以用的,表示位模式执行数学右移位的运算符,例如:
Dim a, b As Integer
b = a 1
MsgBox(b)
b为1
以上就是土嘎嘎小编为大家整理的vb.net右移>>相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!