要制作滚动字幕，可以使用VB的Timer控件和Label控件来实现。
首先，在VB的窗体上添加一个Label控件，设置其AutoSize属性为False，将其宽度设置为窗体宽度。
然后，在窗体上添加一个Timer控件，设置其Interval属性为一个适当的值，表示滚动字幕的速度。
接下来，在窗体的Load事件中，添加以下代码：
```vb
Private Sub Form_Load()
' 将Label控件的初始位置设置在窗体的右侧
Label1.Left = Me.Width
' 设置Timer控件的Enabled属性为True，开始滚动字幕
Timer1.Enabled = True
End Sub
```
然后，在Timer的Tick事件中，添加以下代码：
```vb
Private Sub Timer1_Tick()
' 每次Timer触发时，将Label控件的位置向左移动一定距离
Label1.Left = Label1.Left - 5
' 当Label控件的位置超出窗体的左侧时，将其位置设置在窗体的右侧，实现循环滚动
If Label1.Left + Label1.Width < 0 Then
Label1.Left = Me.Width
End If
End Sub
```
这样，当窗体加载时，Label控件就会开始从右侧向左滚动，并且当滚动到窗体左侧时，又会回到窗体右侧，实现无限循环的滚动字幕效果。
