運作效果: VB程式設計:利用控件數組設定控件狀态 程式代碼: Private Sub Form_Load() For i = 0 To Label1.Count - 1 Label1(i).Caption = "移動滑鼠" Next i End Sub