vb编程：怎样让数字显示滚动条上？？？？？？？？

滚动条本身没这功能，所以只能重新弄个控件来显示数字
Label是不行的，他总是在滚动条下面，所以可以用TextBox或PictureBox

倘若用TextBox可以把边框设置为无，并且不允许人为修改上的内容。方法如下
Text1.BorderStyle = 0
Text1.Locked = True
Text1.Text="你要显示的数字"

倘若用PictureBox可以把边框设置为无，用Print方法来显示文字
可以做到和Label一样的效果，关于背景颜色和字体及字体颜色可以想label一样设置，下面是方法
Picture1.BorderStyle =0
Picture1.AutoReDraw=True
Picture1.Print "你要显示的数字"

还有种方法就是你自己做个有这功能的滚动条控件

新建工程,添加一个timer控件,一个label控件,添加以下代码,即可实现
代码:
Dim a
Private Sub Form_Load()
Timer1.Interval = 10
End Sub

Private Sub Timer1_Timer()
a = a + 100
If Label1.Left > Me.Width Then
a = 1
End If
Label1.Left = 1 + a
End Sub

不能显示吧