要制作滾動字幕，可以使用VB的Timer控件和Label控件來實現。
首先，在VB的窗體上添加一個Label控件，設置其AutoSize屬性為False，將其寬度設置為窗體寬度。
然后，在窗體上添加一個Timer控件，設置其Interval屬性為一個適當的值，表示滾動字幕的速度。
接下來，在窗體的Load事件中，添加以下代碼：
Private Sub Form_Load()
' 將Label控件的初始位置設置在窗體的右側
Label1.Left = Me.Width
' 設置Timer控件的Enabled屬性為True，開始滾動字幕
Timer1.Enabled = True
End Sub
然后，在Timer的Tick事件中，添加以下代碼：
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控件就會開始從右側向左滾動，并且當滾動到窗體左側時，又會回到窗體右側，實現無限循環的滾動字幕效果。
