PPT6常用标准控件.ppt

(2)编写程序代码 功能要求：在三个框架中分别选择字体、字号和颜色，单击“确定”按钮后，文本框中的文本相应属性会发生变化 Private Sub Form_Load() Option1.Value = True Option3.Value = True Option5.Value = True Text1.FontName = 宋体 Text1.FontSize = 16 Text1.ForeColor = RGB(0, 0, 255) End Sub Private Sub Command1_Click() “确定按钮单击事件 If Option1.Value Then Text1.FontName = 宋体 Else Text1.FontName = 幼圆 End If If Option3.Value Then Text1.FontSize = 16 Else Text1.FontSize = 20 End If If Option5.Value Then Text1.ForeColor = RGB(0, 0, 255) Else Text1.ForeColor = RGB(255, 0, 0) End If End Sub 1. 焦点 焦点(Focus，光标)是对象接收鼠标或键盘输入的能力。 要将焦点赋给控件，有以下几种方法： (1)用鼠标选定对象 (2)按快捷键选定对象 (3)按Tab键或Shift+Tab键在当前窗体的各对象之间切换焦点 (4)在代码中用SetFocus方法来设置焦点。例如： Text1.SetFocus ′把焦点设置在文本框Text1 2. Tab键序 Tab键序是指用户按Tab键时，焦点在控件间移动的顺序 反映在控件的TabIndex属性 焦点只能移到可视的窗体或控件上，只有对象的Enable和Visible属性均为True时，才能接收焦点。某些控件如计时器、框架、标签、图像框等不能接收焦点。只有当窗体上任何控件都不能接收焦点时，该窗体才能接收焦点。 6.9 焦点与Tab键序（知识点） 目录 课后作业 第六章编程作业1,2,3,4,5,6 * * * * 列表框表项的输出 列表框接收Click和DblClick事件，但有时不用编写Click事件过程代码，而当单击一个命令按钮或发生DblClick事件时，读取Text属性 (1) 用鼠标单击列表框内某一表项，则该表项值存放在Text属性中。 例如：x = List1.Text 把表项值存放在x变量中  (2) 指定索引号来取表项的内容，例如： List1.ListIndex = 3 x = List1.Text (3) 直接从数组List()中读取，例如： x = List1.List(5) (1)分析：判别条件为 (n Mod 3=0) And (n Mod 8=0) (2)创建应用程序的用户界面和设置对象属性  例6.6 设计一个程序，找出100～800范围内所有能同时被3和8整除的自然数 例6.6 (3)编写程序代码 编写的“显示”按钮Click事件过程代码： Private Sub Command1_Click() List1.Clear For n = 100 To 800 If (n Mod 3 = 0) And (n Mod 8 = 0) Then