189 8069 5689
1、使用label(标签）来模拟灯，只要修改label背景就可以实现跑马灯效果。
创新互联专注于巴彦淖尔网站建设服务及定制，我们拥有丰富的企业做网站经验。 热诚为您提供巴彦淖尔营销型网站建设，巴彦淖尔网站制作、巴彦淖尔网页设计、巴彦淖尔网站官网定制、成都微信小程序服务，打造巴彦淖尔网络公司原创品牌,更为您提供巴彦淖尔网站排名全网营销落地服务。
2、工具vb6
3、示例：
Private WithEvents NewTimer As Timer
Private Sub Form_Load()
Dim i As Integer
For i = 1 To 10
Set NewLabel = Controls.Add("vb.label", "label" i, Me)
NewLabel.Move i * 200, 100, 100, 100
NewLabel.BackColor = vbWhite
NewLabel.Visible = True
Next
Set NewTimer = Controls.Add("vb.timer", "Timer1", Me)
NewTimer.Interval = 200
NewTimer.Enabled = True
End Sub
Private Sub NewTimer_Timer()
Static i As Integer
i = i + 1
Me("label" i).BackColor = vbRed
If i = 1 Then
If i = 1 Then i = 11
Me("label" i - 1).BackColor = vbWhite
If i = 11 Then i = 1
End If
If i = 10 Then i = 0
End Sub
4、注意：复制以上代码到代码窗体，不要加任何控件，直接运行即可。
VB.NET里用GDI+画指示灯其实很简单，稍微查一点资料就能找到gdi+语句的用法的。用GDI+可以画很多种图形，圆形半圆形自然不在话下。如果有很多指示灯在一起的话，改起来也很方便。
当然如果嫌GDI+麻烦可以用label控件，把autosize关掉，将尺寸调小一点，然后利用backcolor调背景颜色作为指示灯，只不过是方形的。
如果指示灯很多而且频繁换颜色的话建议用GDI+，因为GDI+效率高一些
不是语言让图片动起来的，而是图片本身就能动，例如gif格式图片本身就是动画。如果你讲的是图片在网页上移动，而不是图片本身内容的动作，那么不是vb.net的功能必须用java脚本来实现。