本文主要是介绍VB 回忆录(一)——左右移动的标签，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！
这是自己做的第一个稍微有点逻辑的程序，当时我们正在学习VB这门课程。当时我们的VB老师说我是第一个做出来的，还许诺期末考试时给我95分。
新建一个工程，在窗体上放置一个Label和一个Timer，适当调整窗体的布局及控件的大小。设置Timer的Interval为10。定义一个模块级的Byte变量i。
Dim i As Byte
在Timer的Timer事件中写入如下代码。
Private Sub Timer1_Timer()
If Label1.Left = 0 Then i = 0
If Label1.Left + Label1.Width = Form1.Width Then i = 1
Select Case i
Case 0
Label1.Left = Label1.Left + 20
Case 1
Label1.Left = Label1.Left - 20
End Select
End Sub
我们老师在课上讲了我的代码，而且还说我的代码有一个Bug，我也看了看自己的代码。仔细一想还真有问题。就是两个If中的条件不应该使用“=”，而应该是“<”和“>”。
从这断码中可以看出当时的自己还没有代码格式的概念，所以所有的代码都是顶头写的，而且可笑的是我给别人修改代码时，看到没有顶头的就给改成顶头的。
而且当时也没有命名规范的意识，不过自己当时还是很高兴的。
这段代码的主要思路就是用一个模块级变量来表示Label当前应该移动的方向。这个思路虽然简单，但的确是当时的我自己想出来的，这个思路对我以后写的代码影响很深。
这篇关于VB 回忆录(一)——左右移动的标签的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！
