扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
见下面代码，放置定时器，按钮，标签各一个
成都创新互联科技有限公司专业互联网基础服务商，为您提供川西大数据中心，高防主机，成都IDC机房托管，成都主机托管等互联网服务。
Public Class Form1
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick '定时器
If Label1.Right Me.Width Then
Label1.Left += 10'移动距离
Else
Label1.Left = 0
End If
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click '开启或者关闭定时器
Timer1.Interval = 1000 '1秒
If Timer1.Enabled = False Then
Timer1.Start() '开定时器
Else
Timer1.Stop() '关定时器
End If
End Sub
End Class
1左移10位，1后面加10个0
结果就是：10000000000
五、按位运算符
注意不能在VB.Net中直接使用以下二进制数，使用时需转换为相应的十六或十进制数字。
1. 表示按位左移，空缺处补0。如：101101 2 结果为 110100
2. 表示按位右移，如：101101 2 结果为 001011
VB中没有,VB.net是可以用的,表示位模式执行数学右移位的运算符,例如:
Dim a, b As Integer
a = 2
b = a 1
MsgBox(b)
b为1
Dim i As Integer
For i = 0 To Me.Width - Button1.Width 'me为容器，典型的是form1
Button1.Left += 1
Windows.Forms.Application.DoEvents()
Next
原理:不断地变化button1的X轴，使其向右移，同样，只要控制好其x,y轴，就可以变化button的变化
如果是做小游戏，建议弄成类吧，把其中的左（右）移或对角其它移动弄成其接口，以便操作。
由于涉及内容太多，不再详述。原理都一样
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网