VisualBasic 程序设计教程 刘莲英 第9章 界面设计新.pptVIP

第 9 章 界 面 设 计 框架控件（续） 框架内控件的创建步骤： （1）首先绘制框架控件。 （2）在框架中适当位置拖拉出适当大小的控件，或选中控件后将控件粘贴到框架内。 检查控件是否在框架控件中的方法： 移动框架控件，看那些控件是否跟随其移动。 字号选择 Private Sub OptSize_Click(Index As Integer) Select Case Index Case 0 LblDisp.FontSize = 12 Case 1 LblDisp.FontSize = 18 Case 2 LblDisp.FontSize = 24 End Select End Sub 字型选择 Private Sub ChkFont_Click(Index As Integer) Select Case Index Case 0 LblDisp.FontBold = chkFont(0).Value Case 1 LblDisp.FontItalic = chkFont(1).Value Case 2 LblDisp.FontUnderline = chkFont(2).Value Case 3 If chkFont(3).Value = 1 Then LblDisp.FontBold = 0 不加粗 LblDisp.FontItalic = 0 不斜体 LblDisp.FontUnderline = 0 不加下划线 chkFont(0).Value = 0 chkFont(1).Value = 0 chkFont(2).Value = 0 End If End Select If chkFont(0).Value = 0 And chkFont(1).Value = 0 And chkFont(2).Value = 0 Then chkFont(3).Value = 1 Else chkFont(3).Value = 0 End If End Sub 列表框与组合框（续） ⑻ Text属性 该属性为一字符串。如果有文本编辑区，与编辑区中的文本相同；如果没有文本编辑区，与所选项目相同。 ⑼ Sorted属性 该属性指定控件中的选项字符串是否自动按字母表顺序排序 该属性只能在设计时设置，运行时只读 默认值为False时，不排序，项目按加入的先后顺序排列显示。 【例9-2】设计一个计算机的订货单程序。用户可以通过程序选择计算机的型号和数量，选择操作系统以及输入输出设备，用户选择完成后，显示用户的定单。 思路： 计算机的型号放在下拉式组合框Combo1中，用户可以从中选择，也可在组合框的文本框中输入计算机型号； 操作系统放置在下拉列表框Combo2中，只能选择，不能输入； 输入输出设备放在带复选框的列表框List2中。 选择完成后，单击“OK”订单显示在列表框List1中。界面如图9-4所示，各对象的属性设置如表9-6所示。 2) 编写下拉组合框Combo1的焦点移出的事件过程。将用户输入的计算机品牌添加到组合框Combo1中。 Private Sub Combo1_LostFocus() For i = 0 To Combo1.ListCount - 1 If Combo1.List(i) = Combo1.Text Then flag = True Exit For End If Next If i Combo1.ListCount - 1 Then Combo1.AddItem Combo1.Text End If End Sub 4) 三个复选框的单击事件过程，完成界面的显示控制。 Private Sub Check1_Click() Combo1.Enabled = Not Combo1.Enabled Text1.Enabled = Not Text1.Enabled End Sub Private Sub Check2_Click() Combo2.Enabled = Not Combo2.Enabled End Sub Private Sub Check3_Click() List2.Enabled = Not List2.Enabled End