改變背景的顏色

。改變背景的顏色

教學範例《５》…改變背景的顏色

表單設計與程式執行:

表單設計

執行畫面

表單設計

執行畫面

控制項屬性資料:

Form1 : 設BorderStyle=0,沒有框線。
Labe1(0)～Label(9): 建立10個標籤控制項陣列元件;
並修改各個Label的BackColor。

程式碼列表:

Private Sub Form_Click()
End
End Sub

Private Sub Label1_Click(Index As Integer)
Form1.BackColor = Label1(Index).BackColor
End Sub

程式解說:

學習重點:
　˙學會控制項陣列的使用法。
　˙學會Form的WindowState最大化,Form1.WindowState=2。
　˙學會使用Form_Click()事件,在此設為結束程式。
　˙在編排Label陣列時,應學會『格式』裡的『對齊』與『水平間距』,
　　『垂直間距』的調整。
程式說明:
　(1)在第一個Labe1上按兩下;即進入Label1_Click(Index As Integer)
　　 的程式區塊中。 
　(2)Form1.BackColor = Label1(Index).BackColor是說,將第Index個
　　 Label的背景色傳送到Form主表單的背景色;於是Form就變色啦。 
  (3)Form_Click裡,僅有一指令"End",表示在表單空白處按一下就程式結束。