10.2框架( Frame) 1.框架的用途 作为容器放置其他控件对象,将这些控件对象分成可标识 的控件组;框架内的所有控件将随框架一起移动、显示和消失。 2.常用属性 Name属性和 Caption属性 3.事件 可以响应Cick和 Dblclick事件 在应用程序中一般不需要编写有关框架的事件过程
1. 作为容器放置其他控件对象，将这些控件对象分成可标识 的控件组；框架内的所有控件将随框架一起移动、显示和消失。 2. 常用属性 Name属性和Caption属性 3. 可以响应Click和Dblclick 在应用程序中一般不需要编写有关框架的事件过程 10.2 框架(Frame)
例10.5控制文本的字体、字号及颜色 设计步骤如下: (1)创建应用程序的用户界面和设置对象属性 在窗体上设置3个框架 Frame1、 Frame2和 Frame3 Form1 度槊控件的便用 字体 字号 颜色 C宋体 C16号 C幼圆 20号 确定 结束
例10.5 控制文本的字体、字号及颜色 (1)创建应用程序的用户界面和设置对象属性 在窗体上设置3个框架Frame1、Frame2和Frame3
(2)编写程序代码 功能要求:在三个框架中分别选择字体、字号 和颜色,单击“确定”按钮后,文本框中的文本相 应属性会发生变化 Private Sub Form Load Option value= True Option3 value= True Option5 Value= True Text1 FontName="宋体 Text1. Fontsize=16 TextI Fore Color = RGB(0, 0, 255) End Sub ★
(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 。ext1 noName="宋体 Textl FontName="幼圆 End If If Option3 Value Then Text1.fontsize =16 Else Text1. fontsize 20 End if If Option5 Value Then TextI Fore Color = RGB(O, 0, 255) Else TextI Fore Color= RGB(255, 0, 0) End if 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
10.3滚动条 1滚动条的用途 为不能自动支持滚动的应用程序和控件提供滚动功能,也可 作为数据输入的工具 水平滚动条 SCrollbar)和垂直滚动条( Scrollbar) 最小值(Min),最大值(Max);移动滚动块时,代表的值随之 改变 2.常用属性 I)Min、Max属性:Min属性的默认值为0,Max属性的默认 值为32767。 (2) Value属性:设置滚动块在滚动条中的位置值 (3)Smal( Change最小变动值属性 (4) Large change最大变动值属性 ★
10.3 滚动条 1.滚动条的用途 为不能自动支持滚动的应用程序和控件提供滚动功能，也可 水平滚动条(HScrollBar)和垂直滚动条(VScrollBar) 最小值(Min)，最大值(Max) ；移动滚动块时，代表的值随之 改变 2. 常用属性 (1)Min、Max属性：Min属性的默认值为0，Max属性的默认 值为32767 (2)Value属性：设置滚动块在滚动条中的位置值 (3)SmallChange最小变动值属性 (4)LargeChange最大变动值属性