当前位置：文档之家 › vb第5章

vb第5章

  • 格式：ppt
  • 大小：390.50 KB
  • 文档页数：46

下载文档原格式

  / 46

合集下载

计算机VB学习第5章-23页文档资料

计算机VB学习第5章-23页文档资料
End Sub
上一页 下一页
第7页
返回本章首页
练习1：写出下面程序的运行结果
Private Sub Form_Click()
Dim a As Integer, i As Integer, j As Integer
a=0
For i = 1 To 5
For j = -2 To 2
a=a+i+j Next j Print a; Next i Print Print i, j, a End Sub
MsgBox "数据溢出，请重新输入",
vbOKCancel + vbInformation, “数据错误” 上一页
Text1.Text = "" Else
第5页
下一页 返回本章首页
n = CLng(Text1.Text)
k =Int(Sqr(n) ) m = 0 ‘ m是一个标记 ：1—否，0—是 For i=2 To k
循环体 条件 True False
Do While <条件> …… [Exit Do] ……
Loop
循环体 条件 False True
第12页
Do Until <条件>
…
[Exit Do ]
…
上一页
Loop
下一页
返回本章首页
5.3 Do 循环------- 直到型循环
Do … [Exit Do] …
If n Mod k = 0 Then m = 1 Next i
If m = 0 Then Label2.Caption = “是一个素数”
Else Label2.Caption = “不是一个素数”

vb第5章

vb第5章

件 Else
MsgBox "请先在列表中选择某字段", , "注意"
End If
End Sub
17
(2) 将右列表框中选择的字段移动到左列表框中。
Private Sub Command2_Click()
If List2.ListCount = 0 Then
第 五
MsgBox "列表中已没有可选的字段", , "注意"
Visual BASIC
第5章
常用控件
本章要点:
• 选项按钮、复选框
程
• 列表框、组合框
序 设
• 计时器、滚动条、框架
计
1
5.1 控件的公共属性
1. Name属性
(1) 运行时是只读的
第 (2) 缺省名称
五 章
(3) 以字母开始，最长40个字符，可包括字母、数字
和下划线，不能包括标点符号或空格(允许汉字)
常 End Sub
用 内
Private Sub Check3_Click()
部 Text1.FontStrikethru = Check3.Value
控 End Sub 件
Private Sub Check4_Click()
Text1.FontUnderline = Check4.Value
End Sub
第
五
章 List1
List2
常
用
内
部
控 件
将左列表框中选择的书名移动到右列表框中
将右列表框中选择的书名移动到左列表框中
将左列表框中的所有书名移动到右列表框中
将右列表框中的所有书名移动到左列表框中

VB语言第5章教案

VB语言第5章教案
采用Do While...Loop语句 采用Print直接在窗体上输出结果，程序代码： Private Sub Form_Load() Dim n As Integer, s As Long Show n = 1: s = 0 Do While n <= 100 s=s+n*n n=n+1 Loop Print "s="; s End Sub 例5.6 程序运行结果： S＝338350
主页
采用Print直接在窗体上输出结果，程序代码如下： Private Sub Form_Load() Show For i = 1 To 7 Print Tab(10 - i); For j = 1 To 2 * i - 1 Print Chr(i + 48); Next j Print Next i End Sub Print Chr(i+48)与Print i有所不同
主页
例5.7 用π /4＝1 - 1/3 + 1/5 - 1/7 + …… 级数,求π 的近似值。当最后一项的绝对值小于10-5时，停止计算 采用Print直接在窗体上输出结果，程序代码：
Private Sub Form_Load() Show Dim pi As Single, n As Long, s As Integer pi = 0 : n = 1 : s = 1 Do While n <= 100000 '或1/n>=0.00001 pi = pi + s / n s = -s n=n+2 Loop Print "π="; pi * 4 End Sub
假设列表框List1中有四个表项，并已选定第2项，则 有： List1.ListIndex 为1 List1.Text的值为”副教授” List1.Selected(1)为True

第5章 常用控件

第5章 常用控件

框架 框架是一种容器控件。设计程序界面时，如果想 用框架将其它对象“包容”起来，应首先将框架 添加到窗体上，然后再将其它对象添加到框架中。 因为框架是容器对象，当其Enabled属性设置为 False时，框架中所有对象都处于非活动状态。 因此，框架既起到对控件分组的作用，又使其中 的控件成为一个整体，从而可以对框架中的控件 进行整体激活或屏蔽。 框架的方法和事件与窗体基本相同。
单选按钮
常用属性 1）Caption属性：设置按钮上的文字内容。 2）Alignment属性：设置文字的对齐方式。 3）Value属性：判断按钮是否处于被选中状态。其值 为True或False。选中某个单选按钮，其值为True，否 则为False。 单选按钮常用事件为Click事件。单击单选按钮，此单 选按钮变成选中状态，同时同组的其它单选按钮将变 成未选中状态。 例：设置文字字体（Fontname）
常用属性
1）Value属性：返回一个与滚动滑块位置对应的值。 Value属性值的变化范围不能超出由Min属性和Max属 性两者规定的范围。 2）Min属性：规定Value属性的最小取值，即当滚动 滑块在滚动框最左端时，Value属性的值。 3）Max属性：规定Value属性的最大取值，即当滚动 滑块在滚动框最右端时，Value属性的值。 4）SmallChange属性：用于设置程序运行时，鼠标单 击滚动箭头一次，Value属性值的改变量。 5）LargeChange属性：用于设置程序运行时，鼠标单 击滚动框一次，Value属性值的改变量。
例
1) 在列表框中选择项目，在文本框中输出 Text1=List1.Text 2) 在两全列表框之间移动项目 List2.AddItem List1.Text List1.RemoveItem List1.ListIndex 3) 利用列表框实现数据输入

VB语言第5章教案：数据备份与恢复思路

VB语言第5章教案：数据备份与恢复思路

VB语言第5章教案：数据备份与恢复思路。

一、备份和恢复的概念在计算机系统中，数据备份和恢复是重要的概念。

备份是指将数据复制到另一个媒体上，以便在主数据媒体发生故障或数据丢失时，可以从备份媒体上恢复数据。

恢复是指将备份媒体上的数据复制到主数据媒体上，以便恢复数据的完整性和可用性。

二、数据备份的类型在VB中，数据备份可以分为两种主要类型：完全备份和增量备份。

1.完全备份完全备份指备份整个数据集。

这种备份需要时间较长，并且需要大量的存储空间。

但是，它可以提供完全的数据备份。

2.增量备份增量备份指备份基于上次备份之后完成的数据更改。

它仅备份最近更改过的数据，并且比完全备份需要更少的时间和空间。

三、数据备份和恢复的编程技巧在VB中，实现数据备份和恢复需要掌握一些编程技巧。

以下是一些基本的技巧：1.使用FileCopy函数进行数据备份FileCopy函数可以将文件从一个位置复制到另一个位置。

使用该函数，可以将数据备份到指定的位置。

2.使用FileLen函数获取文件大小FileLen函数可以获取指定文件的大小。

使用该函数可以确保备份的数据和原始数据大小相同。

3.使用Kill函数删除文件在恢复数据时，可能需要删除原始数据，然后将备份数据恢复到原始位置。

使用Kill函数可以删除指定的文件。

四、数据备份和恢复的思路在实现数据备份和恢复之前，应先考虑以下问题：1.备份数据应保存在哪里？备份数据应该保存在备份介质（例如磁盘或云存储）上。

最好将备份介质与原始数据介质分开存储，以防止同一事件（例如火灾或盗窃）对两个位置造成损害。

2.备份数据应该多久备份一次？数据备份的频率取决于数据的重要性和变化频率。

如果数据经常更改，则建议每天备份一次。

如果数据很少更改，则可以每周或每月备份一次。

3.如何恢复数据？在恢复数据之前，必须确定原始数据已经丢失或损坏。

可以使用备份数据恢复原始数据。

以上是关于数据备份和恢复的思路和问题，接下来是一个VB程序示例：Private Sub BackupData_Click()Dim source_file As StringDim target_file As Stringsource_file = "C:\data\salesdata.accdb"target_file = "D:\backup\salesdata.accdb"On Error GoTo BackupErrorFileCopy source_file, target_fileMsgBox "Data backup complete."Exit SubBackupError:MsgBox "Backup failed." & vbCrLf & Err.DescriptionEnd Sub以上示例演示了如何使用FileCopy函数备份数据库。

vb第5章 选择分支与循环PPT课件

vb第5章 选择分支与循环PPT课件
end if
3、if 条件1 then
语句组1
elseif 条件2 then
语句组2
elseif 条件3 then 语句组3
…… [else
语句组n] end if
第5章 选择分支与循环
18
书写IF语句注意
ELSE 后的语句另起一行。 ELSE的配对问题 书写成阶梯形状 elseif 与 else 的区别
print “B”
ELSE
print “A”
ENDIF
ENDIF
ENDIF
第5章 选择分支与循环
15
用ELSEIF语句
IF (cj <60 ) THEN
与它？
print “D”
ELSEIF (cj <70 ) THEN
print “C”
ELSEIF (cj <85) THEN
与谁配对？
与最靠近的IF或 ELSE ELSEIF语句配对。
第5章 分支结构与循环
5.1 分支结构与分支结构语句 5.2 循环结构与循环结构语句 5.3 程序示例
第5章 选择分支与循环
1
整体概述
概况一
点击此处输入相关文本内容 点击此处输入相关文本内容
概况二
点击此处输入相关文本内容 点击此处输入相关文本内容
概况三
点击此处输入相关文本内容 点击此处输入相关文本内容
从大到小顺序输出
If x<y Then
x
y
Xt==xy
x=y Ty==tx
t
End If Print x, y
或
If x<y Then t=x: x=y: y=t
图 1-3-8 两 个 数 交 换

VB第5章 数组、结构与集合


其中的“变量名”表示一个用于依次存放各数组元素的变量， 其类型必须与数组元素的类型一致。在需要遍历所有数组元素时， 特别是在数组长度不易确定的环境中，使用这种For Each…Next语 句就很方便。
5.1 数组
5.1.1 声明和访问数组 3. 多维数组 下标数量大于等于2的数组称为“多维数组”。在多维数组中， 比较常用的是二维数组，其数据组织形式与常见的二维表格十分相 似。声明二维数组与声明一维数组的语法格式类似，例如： Dim ary1(3, 4) As Integer '声明一个4行5列的数组 '声明一个两索引最大值不确定的二维数组 Dim ary2(,) As Integer
第5章 数组、结构与集合
本章讲述的主要内容
5.1 数组数组
在现实生活中有着各种各样的数据，这些数据在所讨论的问 题中可分为两类：一类是仅与其取值有关，而与其所在的位置无 关；更常见的另一类是不仅与其取值有关，并且与其所在的位置 也密切相关，如二维表格中的数据与其所在行列坐标有着密切的 关系。 前面我们所讲过的变量都是简单变量，利用简单变量可以解 决不少问题，但是如果在程序设计中仅使用简单变量，势必受到 简单变量单独性和无序性的限制，而难于或无力解决那些数据不 仅与取值有关，而且与其所在位置也有关的较复杂的问题，如学 生成绩就隐含着名次和成绩。要想方便地解决这些问题，通常需 要借助于复杂数据类型即数组。数组是一些具有相同类型的数据 按一定顺序组成的序列，数组中的每一个数据都可以通过数组名 及唯一索引号（下标）来存取。
声明多维数组时，用逗号表示维数，一个逗号表示二维数组， 两个逗号表示三维数组，依次类推。
5.1 数组
5.1.2 Array类 Visual Studio提供的Array类中包含了一些适用于数组常用操 作的方法，使用这些方法能完成数组清零、复制、排序、反转等常 用操作。Array类的常用方法见表5-2。

大学计算机vb课程 第五章 常用控件【精选】


0--Unchecked：未被选定
False：未选定 1--Checked：选定
2--Grayed：灰色，禁止选择
Style属性
0--Standard：标准方式
1--Graphical：图形方式
Picture属性
未选定时的图标或位图
DownPicture属性 选定时的图标或位图
DisabledPicture属性 禁止选择时的图标或位图
选中。
Sorted(D)：True：按字母顺序排列。False：按加入先后顺序排列。 Text(P) ：被选中列表项的内容，如：
List 1.List(List 1.ListIndex) = List1.Text MultiSelect：0-None：禁止多项选择；
1-Simple：简单多项选择； 2-Extended：扩展多项选择。
常用事件
5.1 单选钮和复选框
有Click事件，因为单击时自动改变状态，故不需要编写过程。
【例5-1】
用单选按钮和复选框制作如图 所示窗口。当用户选择了“所在学 院”和“学习课程”后，单击“确 定”，则选择结果显示在下面的文 本【框属中性。设置】
默认名
Name属性
其它属性及设置
Option1 Option2 Option3 Check1 Check2 Check3 Check4 Label1
择的项目列出来，不 组合框有三种类型，由其Style属性值决定，Style
能直接修改项目。 可为0、1或2。
0——默认值。下拉式组合框。
1——简单组合框。
2——下拉式列表框。
常用属性
5.3 列表框和组合框
说明：P——只可在程序中设置或引用，D——只可在设计状态设置 List (PD) ：字符型数组，存放列表框的项目，下标从0开始。 ListIndex(P)：选中项目的序号，无项目被选定时为-1。 ListCount(P)：项目的数量，ListCount-1是最后一项的下标。 Selected(P)：逻辑数组。Selected(i)的值为True表示第i+1项被

VB程序设计第五章 数组


5. 求数组中最大元素和所在下标及各元素之和
方法：先假设第一个元素及下标为所求结 果，然后依次比较。 利用循环结构进行

Dim Max As Integer, iMax As Integer, sum As Integer Max=iA(1)：iMax=1: sum=iA(1) For i = 2 To 10 sum = sum + iA(i) If iA(i) > Max Then Max = iA(i) iMax = i End If 求最小值同样方法进行 Next i
(a) 利用Array()函数，可以直接给数组赋值; (b) 数组的声明必须是动态数组或者省略圆 括号，且其类型必须为 Variant (c) 数组的下界默认为0，也可以通过 Option Base 语句确定 (d) 上界由 Array() 函数括号内参数个数确定， 或者由 UBound() 函数确定。

赋值时注意： (1) 赋值号两边的上界类型必须一致 (2) 如果赋值号左边是一个动态数组，则赋值后数组 大小与右边一致。 (3) 如果左边是静态数组，则数组赋值出错！
4. 数组的输出
数组的输出，采用循环输出即可 例：输出方阵sC中的下三角元素

For i = 0 To 4
For j = 0 To i sc(i, j) = i * 5 + j Print sc(i, j); " "; Next j Print ' 换行 Next I （参见P93的代码。）

下标可以是整型的常数、变量、表达式， 也可以是又一个数组元素。 数组元素的使用规则和同类型的简单变量 相同。 一般情况下，数组元素类型必须相同。 但当数组类型定义为 “variant” 时，可以包 含不同类型的元素。

VB第5章

【例5-1】编一个华氏温度与摄氏温度之间转换的程序，设计界面如图5-4所示。

摄氏温度与华氏温度的转换关系为：F=9 5C+32其中：F为华氏温度，C为摄氏温度。

要求：用按钮实现转换。

即单击“摄转华”按钮，则将摄氏温度转换为华氏温度；同样，单击“华转摄”按钮，则将华氏温度转换为摄氏温度。

分析：（1）Text文本框存放的String类型，为了程序正常运行，应通过V al()函数将字符串转换为数值类型。

（2）上述公式中右边的变量F、C应该是有值的，该值可通过TextBox1、TextBox2分别赋值获得。

步骤：（1）在窗体上画2个文本框、2个标签和2个命令按钮，如图5-4所示。

（2）属性设置如表5-1所示。

表5-1各控件属性设置（3）代码设计如下：′实现“华转摄”按钮的功能Private Sub Button1_Click(ByVal sender As System.Object，ByVal e As System．EventArgs)Handles Button1.ClickTextBox2.Text=5/9*(Val(TextBox1.Text)-32)End Sub′实现“摄转华”按钮的功能Private Sub Button2_Click(ByVal sender As Object，ByVal e As System.EventArgs) Handles Button2.ClickTextBox1.Text=9/5*Val(TextBox2．Text)+32End Sub注意：其中Val()函数为将字符串转换为相应的数值。

这个函数会经常用到，要求掌握。

华氏温度与摄氏温度之间转换的程序运行结果如图5-5所示。

图5-4设计界面图5-5程序运行结果【例5-2】使用InputBox函数输入圆的半径，求圆的面积。

在窗体的单击事件中编写代码如下：Private Sub Form1_Click(ByVal sender As Object，ByVal e As System.EventArgs)Handles MyBase.ClickConst pi = 3.14159Dim g As Graphics ′声明一个Graphics类型变量Dim r As Singleg=Me.CreateGraphics′对变量g初始化g.Clear(Me·BackColor)′清除窗体上的内容r=Val(InputBox("请输入半径："、"半径输入框"、"1"))g.DrawString("半径="＆r,Me.Font,Brushes.Red,10,5)g.DrawString("面积="＆Str(pi*r*r),Me.Font,Brushes.Red,10,20)End Sub运行程序，单击窗体，则首先弹出输入对话框如图5 6所示，等待用户输入半径值。

  1. 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

Байду номын сангаас 第 五 章 常 用 内 部 控 件
(3) 将左列表框中的所有字段移动到右列表框中 Private Sub Command3_Click() For i = 0 To List1.ListCount - 1 List1.Selected(0) = True List2.AddItem List1.Text List1.RemoveItem 0 Next i End Sub (4) 将右列表框中的所有字段移动到左侧列表框中 Private Sub Command4_Click() For i = 0 To List2.ListCount - 1 List2.Selected(0) = True List1.AddItem List2.Text List2.RemoveItem 0 Next i End Sub 19
20
第 五 章 常 用 内 部 控 件
3. 事件 组合框的事件与Style属性有关。 Style为0时: 响应Click、Change、DropDown事件 Style为1时: 响应Click、DblClick、Change事件 Style为2时: 响应Click、DropDown事件 4. 方法 AddItem: 向组合框中添加新的项目 <对象名>.AddItem <项目>[,<索引>] RemoveItem: 从组合框中移除项目 <对象名>.RemoveItem <索引> Clear: 清除组合框中的所有项目 <对象名>.Clear
5.5
组合框(ComboBox)
第 五 章 常 用 内 部 控 件
1. 作用: 提供列表(可折叠)、文本输入 2. 属性 List—列表内容(Ctrl+Enter换行) Style—外形 0—下拉组合框(折叠) 1—简单组合框(不折叠) 2—下拉列表框(不能修改Text属性) Text—文本框内容 ListIndex—运行期用，当前选定项目的索引 索引从0开始 ListCount—列表部分项目的个数 Sorted—元素是否自动按顺序排序
10
5.3.2
单选按钮(OptionButton)
第 五 章 常 用 内 部 控 件
1. 作用: 多选一(放在窗体上、或放在其他容器中) 2. 属性 (1) Value: True—选中 False—未选中 (2) Alignment属性: 决定文本的对齐方式 (3) Style—控制外观 3. 事件 Click事件—使选项按钮从未选择变成选择状态时 (单击鼠标改变、代码改变 )
8
【例5-2】设计界面如下图所示，用复选框设置文 本框的文字样式与效果。 第 五 章 常 用 内 部 控 件
Check1 Check2 Check3
Check4
9
第 五 章 常 用 内 部 控 件
Private Sub Check1_Click() Text1.FontBold = Check1.Value End Sub Private Sub Check2_Click() Text1.FontItalic = Check2.Value End Sub Private Sub Check3_Click() Text1.FontStrikethru = Check3.Value End Sub Private Sub Check4_Click() Text1.FontUnderline = Check4.Value End Sub
15
【例5-4】设计如下图所示的界面，左列表框列出了 某数据表格的各列(字段)名称。 第 五 章 常 用 内 部 控 件
List1
List2
将左列表框中选择的书名移动到右列表框中 将右列表框中选择的书名移动到左列表框中 将左列表框中的所有书名移动到右列表框中 将右列表框中的所有书名移动到左列表框中
3
第 五 章 常 用 内 部 控 件
“显示图像”按钮Command1的Click事件过程如 下: Private Sub Command1_Click() Image1.Visible = True Command1.Enabled = False Command2.Enabled = True End Sub ―隐藏图像”按钮Command2的Click事件过程如下: Private Sub Command2_Click() Image1.Visible = False Command1.Enabled = True Command2.Enabled = False 4 End Sub
第5章
Visual BASIC
程 序 设 计
常用控件
本章要点:
• 选项按钮、复选框
• 列表框、组合框
• 计时器、滚动条、框架
1
第 五 章 常 用 内 部 控 件
5.1 控件的公共属性 1. Name属性 (1) 运行时是只读的 (2) 缺省名称 (3) 以字母开始，最长40个字符，可包括字母、数字 和下划线，不能包括标点符号或空格(允许汉字) (4) 控件数组的名称: Name(Index) 2. Caption属性 (1) 加访问键: &字母 (2) Label控件标题大小没有限制。其他有标题的控 件，标题大小限制为255个字符。 (3) 注意与Name属性、Caption属性的区别
16
第 五 章 常 用 内 部 控 件
(1) 将左列表框中选择的字段移动到右列表框中 Private Sub Command1_Click() If List1.ListCount = 0 Then MsgBox "列表中已没有可选的字段", , "注意" Exit Sub End If If List1.ListIndex >= 0 Then List2.AddItem List1.Text List1.RemoveItem List1.ListIndex Else MsgBox "请先在列表中选择某字段", , "注意" End If End Sub
13
5.4
列表框(ListBox)
第 五 章 常 用 内 部 控 件
1. 作用:提供选项列表、内容多时自动出现滚动条 2. 属性 Style—外形(常规形式、复选框形式) List—列表内容。 设计时: 用Ctrl+换行; 运行时: List(i)表示第i项 Columns—列表形式 0:垂直单列、1:水平单列、>1:水平多列 Text—只读、运行期用，最后一次选中的表项的文本 ListIndex—运行期用，当前选定项目的索引(0…) 如果未选定项目，则 ListIndex 值为 -1 ListCount—列表部分项目的个数 Sorted—元素是否自动按字母顺序排序 Selected—运行期用，用于选择某项 如List1.Selected(3)=True 选择第4项
17
第 五 章 常 用 内 部 控 件
(2) 将右列表框中选择的字段移动到左列表框中。 Private Sub Command2_Click() If List2.ListCount = 0 Then MsgBox "列表中已没有可选的字段", , "注意" Exit Sub End If If List2.ListIndex >= 0 Then List1.AddItem List2.Text List2.RemoveItem List2.ListIndex Else MsgBox "请先在列表中选择某字段", , "注意" End If End Sub 18
5. Left、Top、Height、Width属性 对于窗体，这些属性总是以缇为单位表示；对于 控件，它们的度量单位取决于其容器的坐标系统 第 五 章
X
常 用 内 部 控 件
Top Left Width Y Height
5
第 五 章 常 用 内 部 控 件
6. BackColor、ForeColor属性 (1) 在Label和Shape控件中，如果BackStyle属性的 设置值为0(透明)，则忽略BackColor属性。 (2) 如果在Form对象或PictureBox控件中设置 BackColor属性，则所有已经打印的文本或用绘 图方法绘制的图形都将被擦除掉。 (3) 设置ForeColor属性值不会影响已经打印的文本 或绘制的图形。 7. FontName、FontSize、FontBold、FontItalic、 FontStrikethru、FontUnderline属性
14
第 五 章 常 用 内 部 控 件
MultiSelect: 0—缺省值，不允许复选。 1—鼠标单击、按空格键在列表中选择或取消选择 2 —按下 Shift并单击鼠标或按下 Shift 以及一个箭 头键将在以前选中项的基础上扩展选择到当前选 中项。按下 Ctrl 并单击鼠标在列表中选中或取消 选中项。 3. 方法 AddItem—向列表框中添加新的项目 <对象名>.AddItem <项目>[,<索引>] RemoveItem—从列表框中移除项目 <对象名>.RemoveItem <索引> Clear—清除所有列表的 <对象名>.Clear
6
第 五 章 常 用 内 部 控 件
5.2 框架(Frame) 1. 作用: 作为容器，对控件进行分组 2. 如何将控件放在容器中 • 选中容器，在容器中直接画 • 选中容器，粘贴控件 3. 如何检查控件是否在容器中 拖动容器，控件随容器移动 4. 选中框架中的多个控件: Ctrl+拖动 5. 删除容器时，其中的控件随之被删除 6. 框架的常用属性 Caption: Font: ForeColor: Backcolor: Enabled:……为False时框架中的控件不可用