VB教程：框架（Frame）

9、框架（Frame）
    作用：框架主要用來對其他控件進行分組，以便用戶識別。主要用于為單選按鈕分組，因為在若干個單選按鈕中只可以選擇一個，但是有時有多組選項，希望在每組選項中各選一項。這時就可將單選按鈕分成幾組，每組作為一個單元，用框架分開。
    向框架中添加控件：如果希望將已經(jīng)存在的若干控件放在某個框架中，可以先選擇所有控件，將它們剪貼到剪貼板上，然后選定框架控件并把它們粘貼到框架上（不能直接拖動到框架中）；也可以先添加框架，然后選中框架，再在框架中添加其它控件，這樣在框架中建立的控件和框架形成一個整體，可以同時被移動、刪除。
    注意：不能用雙擊的方法向框架中添加控件，也不能將控件選中后直接拖動到框架中，否則這些控件不能和框架成為一體，其載體不是框架而是窗體。
    選擇框架中的多個控件：要選擇框架中的多個控件，在使用鼠標拖拉框架內(nèi)包圍控件的時候需要按下crtl鍵。在釋放鼠標的時候，位于框架之內(nèi)的控件將被選定。或者按下crtl鍵，再使用鼠標單擊各控件，這樣位于框架之內(nèi)的控件也可以被選定。
    例子：設(shè)計一個編輯字體程序。
    界面：
    注意：Label1屬性設(shè)置為：Caption 置空、AutoSize 為True
    代碼：
    Private Sub Command1_Click()
    If Option1.Value Then Label1.FontName = "微軟雅黑"
    If Option2.Value Then Label1.FontName = "隸書"
    If Option3.Value Then Label1.FontName = "黑體"
    If Option4.Value Then Label1.FontSize = 16
    If Option6.Value Then Label1.FontSize = 18
    If Option5.Value Then Label1.FontSize = 22
    If Option7.Value Then Label1.ForeColor = QBColor(9)
    If Option8.Value Then Label1.ForeColor = QBColor(13)
    If Option9.Value Then Label1.ForeColor = QBColor(10)
    Label1.Caption = "歡迎使用VB"
    End Sub
    Private Sub Form_Load()
    Option1.Value = True
    Option4.Value = True
    Option7.Value = True
    End Sub
    Private Sub Command2_Click()
     End
    End Sub