《Visual Basic 6.0项目教程》（电工版第三版）期末复习卷（六）

《Visual Basic 6.0项目教程》电工版第三版 期末复习卷（六） 时间：120分钟 总分：120分 班级 姓名 学号 成绩 一、选择题(本大题共25小题，每小题2分，共50分) 1.以下选项中，能作为Visual Basic合法变量名的是（ ）。 A. 3abc B. a-b C. my_Var D. Dim 2.在Visual Basic集成开发环境中，能用来运行程序的操作是（ ）。 A.按F8键 B. 从“调试”菜单中选择“逐语句”命令 B.按Ctrl+F5组合键 D. 在工具栏中单击“启动”按钮 3.关于常量的说法，正确的是（ ）。 A.常量的值在程序运行过程中可以被修改 B.符号常量必须先声明后使用 C.数值常量只有整数和浮点数两种 D.用户自定义的符号常量不能在其他模块中使用 4.在运行时向组合框中添加项目的方法是（ ）。 A.AddItem B. Add C. InsertItem D. Append 5.当处理包含文本和二进制数据混合的文件时，最好使用（ ）文件访问方式。 A. 顺序型 B. 随机型 C. 二进制型 D. 文本型 6.下列属于Visual Basic事件的是（ ）。 A.Change B. Print C. Abs D. Sqrt 7.有关变量声明的说法，错误的是（ ）。 A.在过程中用Dim声明的变量是局部变量 B.Static声明的变量在过程结束后不会释放其值 C.Public声明的变量只能在标准模块中使用 D.变量声明可提高程序可读性和减少错误 8.设a = 5，b = 3，表达式a > b And b < 10的值是（ ）。 A.1 B. -1 C. True D. False 9.函数InStr("Hello World!","World")的值是（ ）。 A.6 B. 7 C. 8 D. 9 10.阅读下面程序段： Private Sub Command1_Click() Dim x As Integer, y As Integer x = 2: y = 3 For i = 1 To 2 x = x * y y = y + 1 Next i Print x, y End Sub 程序运行后，显示的结果是（ ）。 A. 12 5 B. 18 5 C. 12 4 D. 18 4 11.以下是Visual Basic合法数组元素表示的是（ ）。 A.A{5} B. A(2 + 3) C. A[1 to 5] D. A10 12.程序段： Private Sub Form_Load() Me.Caption = Date End Sub 其功能是（ ）。 A.在窗体中显示当前日期 B.在窗体标题栏上显示当前日期 C.在窗体标题栏上显示当前时间 D.在窗体中显示当前时间 13.编写一个函数过程用于返回数组a中10个数中的最小数，代码如下： Function MinVal(a() As Integer) As Integer Dim min min = 1 For k = 2 To 10 If a(k) < a(min) Then min = k End If Next k MinVal = min End Function 程序运行时发现函数返回值错误，正确的修改方案是（ ）。​ A. 语句 min = 1 应改为 min = a (1)​ B. 语句 For k = 2 To 10 应改为 For k = 1 To 10​ C. If 语句中的条件 a (k) < a (min) 应改为 a (k) < min​ D. 语句 MinVal = min 应改为 MinVal = a (min)​ 14.在窗体中对控件进行操作，正确的是（ ）。 A.单击控件的边框可选中多个控件 B.按Delete键可删除选中的控件 C.拖动控件的标题栏可移动控件位置 D.右击控件可直接打开代码窗口 15.对话框在关闭之前，能继续执行应用程序其他部分的是（ ）。 A.模态对话框 B. 非模态对话框 C. 输入对话框 D. 输出对话框 16.下列关于MDI父窗体和子窗体关系的叙述，正确的是（ ）。 A.MDI子窗体可以脱离MDI父窗体单独存在 B.MDI父窗体只能有一个子窗体 C.MDI子窗体最大化时，其标题会显示在MDI父窗体标题栏 D.MDI子窗体最小化时，其图标显示在任务栏 17.以下属于顺序文件写操作的访问方式是（ ）。 A.Input B. Output C. Random D. Binary 18.为使文本框同时具有水平和垂直滚动条，应将ScrollBars属性值设置为（ ）。 A. 0 B. 1 C. 2 D. 3 19.文本框控件中，用于设置文本框内文本字体颜色的属性是（ ）。 A.BackColor B. ForeColor C. FontColor D. TextColor 20.要在命令按钮上显示图像，正确的操作是（ ）。 A.直接设置Picture属性 B.先将Style属性设置为0，再设置Picture属性 C.先将Style属性设置为1，再设置Picture属性 D. 无法在命令按钮上显示图像 21.如果要使列表框允许多选，应将MultiSelect属性设置为（ ）。 A.0 B. 1 C. 2 D. 1或2 22.下列每组控件中，都含有滚动条的是（ ）。 A.PictureBox和Label B. ListBox和ComboBox B.TextBox和FileListBox D. DriveListBox和DirListBox 23. 窗体上有一个图像框Picture1和一个命令按钮Command1，执行以下程序： Private Sub Command1_Click() Picture1.Picture = LoadPicture("c:\test.jpg") Picture1.Cls Picture1.Print "Hello" End Sub 执行结果是（ ）。 A.图像框显示图片且显示文字“Hello” B.图像框只显示文字“Hello”，无图片显示 C.图像框显示图片，不显示文字“Hello” D.图像框既无图片也无文字显示 24.使用“保存”对话框的方法是（ ）。 A.在程序中用ShowSave方法显示“保存”对话框 B.双击工具箱中的“保存”对话框控件，添加到窗体后使用 C.单击CommonDialog控件，在窗体画出后将Action属性设为2 D.在程序中用Show方法显示“保存”对话框 25.在设计菜单时，若要添加一个菜单分隔项，则菜单分隔项的标题必须设置为（ ）。 A. 冒号 (:) B. 加号 (+) C. 减号 (-) D. 感叹号 (!) 二、判断题(本大题共10小题，每小题2分，共20分) 1.（ ）使用 Do...Loop While 语句时，循环体中的代码至少会被执行一次。 2.（ ）程序执行End 语句，所有正在运行的窗体、程序进程都会被立即终止，整个应用程序随即结束运行。 3.（ ）在同一过程内，定义两个相同标识符的变量会导致程序出现命名冲突错误。​ 4.（ ）Data 控件在窗体运行时默认处于隐藏状态，需手动设置才可见。 5.（ ）ReDim 语句只能用于事件过程或通用过程内，对动态数组大小进行重新定义。 6.（ ）如果需要在窗体上添加多个相同类型的控件,可以先漆加一个控件并设置其属性，然后通过复制操作来添加其他控件。 7.（ ）驱动器列表框控件在程序运行时，会展示用户系统中所有磁盘驱动器的列表供用户选择。 8.（ ）VB 中一旦定义了定长字符串，其内容和长度在程序运行过程中都无法改变。 9.（ ）系统功能设计明确了程序需要实现的各项功能模块，是程序设计的开端和核心架构。 10.（ ）逻辑运算符的优先级高于比较运算符。 三、名词解释题(本大题共4小题，每小题4分，共16分) 1.方法 2.编译错误 3定长数组 4.标准模块 四、简答题(本大题共4小题，每小题6分，共24分) 1.简述VB语句书写格式。 2.Visual Basic 6.0 的表达式分为哪几类？ 3.简述MsgBox函数及功能。 4.控件的通用属性有哪些？ 五、综合题(本大题共1小题，每小题10分，共10分) 编写一个 Visual Basic 程序，要求实现以下功能： （1）定义一个包含 10 个元素的整数数组。 （2）从键盘输入 10 个整数，将这些整数存储到数组中。 （3）找出数组中的最大值和最小值。 （4）输出最大值和最小值。 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $$ 《Visual Basic 6.0项目教程》电工版第三版 期末复习卷（六） 时间：120分钟 总分：120分 班级 姓名 学号 成绩 一、选择题(本大题共25小题，每小题2分，共50分) 1.以下选项中，能作为Visual Basic合法变量名的是（ ）。 A. 3abc B. a-b C. my_Var D. Dim 【答案】C 【解析】变量名命名规则为：必须以字母或下划线开头，不能包含标点符号、空格、运算符等特殊字符，不能使用VB保留字。A选项以数字开头；B选项包含运算符“-”；D选项是VB保留字，均不符合要求，C选项符合规则。 2.在Visual Basic集成开发环境中，能用来运行程序的操作是（ ）。 A.按F8键 B. 从“调试”菜单中选择“逐语句”命令 B.按Ctrl+F5组合键 D. 在工具栏中单击“启动”按钮 【答案】D 【解析】按F8键是逐语句调试；“调试”菜单中的“逐语句”命令也是用于调试；按Ctrl+F5组合键是在不调试的情况下运行程序，但最直接运行程序的操作是在工具栏中单击“启动”按钮，所以选D。 3.关于常量的说法，正确的是（ ）。 A.常量的值在程序运行过程中可以被修改 B.符号常量必须先声明后使用 C.数值常量只有整数和浮点数两种 D.用户自定义的符号常量不能在其他模块中使用 【答案】B 【解析】常量在程序执行期间数值始终不变，A错误；符号常量必须先声明（如用Const声明）后使用，B正确；数值常量包括整数、定点数和浮点数，C错误；在模块中用Public声明的符号常量可在整个应用程序中使用，D错误 。 4.在运行时向组合框中添加项目的方法是（ ）。 A.AddItem B. Add C. InsertItem D. Append 【答案】A 【解析】在Visual Basic中，向组合框、列表框添加项目的常用方法是AddItem，其他选项均不是正确的添加项目方法。 5.当处理包含文本和二进制数据混合的文件时，最好使用（ ）文件访问方式。 A. 顺序型 B. 随机型 C. 二进制型 D. 文本型 【答案】C 【解析】顺序型适用于处理纯文本文件；随机型用于按记录随机访问数据；二进制型可处理任何类型的数据，包括文本和二进制混合数据；不存在“文本型”这种标准文件访问方式，所以选C。 6.下列属于Visual Basic事件的是（ ）。 A.Change B. Print C. Abs D. Sqrt 【答案】A 【解析】Change是文本框等控件的常见事件，用于检测内容变化；Print是输出语句，不是事件；Abs和Sqrt是数学函数，不是事件，所以选A。 7.有关变量声明的说法，错误的是（ ）。 A.在过程中用Dim声明的变量是局部变量 B.Static声明的变量在过程结束后不会释放其值 C.Public声明的变量只能在标准模块中使用 D.变量声明可提高程序可读性和减少错误 【答案】C 【解析】在过程中用Dim声明的变量作用域局限于该过程，是局部变量，A正确；Static声明的静态变量在过程结束后仍保留其值，下次调用时继续使用，B正确；Public声明的变量可在整个应用程序中使用，不局限于标准模块，C错误；变量声明可明确变量用途，提高程序可读性和减少错误，D正确。 8.设a = 5，b = 3，表达式a > b And b < 10的值是（ ）。 A.1 B. -1 C. True D. False 【答案】C 【解析】在逻辑表达式中，And表示“与”关系，两边条件都为真时整个表达式才为真。a > b（5 > 3）为真，b < 10（3 < 10）也为真，所以整个表达式的值为True。 9.函数InStr("Hello World!","World")的值是（ ）。 A.6 B. 7 C. 8 D. 9 【答案】B 【解析】InStr函数用于在字符串中查找子字符串，返回子字符串首次出现的位置。“World”在“Hello World!”中从第7个字符开始，所以返回值是7。 10.阅读下面程序段： Private Sub Command1_Click() Dim x As Integer, y As Integer x = 2: y = 3 For i = 1 To 2 x = x * y y = y + 1 Next i Print x, y End Sub 程序运行后，显示的结果是（ ）。 A. 12 5 B. 18 5 C. 12 4 D. 18 4 【答案】A 【解析】第一次循环：x = 2 * 3 = 6，y = 3 + 1 = 4；第二次循环：x = 6 * 4 = 24，y = 4 + 1 = 5 ，所以最终x = 12，y = 5。 11.以下是Visual Basic合法数组元素表示的是（ ）。 A.A{5} B. A(2 + 3) C. A[1 to 5] D. A10 【答案】B 【解析】在VB中，数组元素使用圆括号表示，A选项用花括号错误；C选项方括号用法错误；D选项没有使用括号，无法明确是数组元素，B选项中A(2 + 3)即A(5)是合法表示。 12.程序段： Private Sub Form_Load() Me.Caption = Date End Sub 其功能是（ ）。 A.在窗体中显示当前日期 B.在窗体标题栏上显示当前日期 C.在窗体标题栏上显示当前时间 D.在窗体中显示当前时间 【答案】B 【解析】Me代表当前窗体，Caption属性用于设置或返回窗体的标题栏内容，Date函数返回当前日期，所以该程序段功能是在窗体标题栏上显示当前日期。 13.编写一个函数过程用于返回数组a中10个数中的最小数，代码如下： Function MinVal(a() As Integer) As Integer Dim min min = 1 For k = 2 To 10 If a(k) < a(min) Then min = k End If Next k MinVal = min End Function 程序运行时发现函数返回值错误，正确的修改方案是（ ）。​ A. 语句 min = 1 应改为 min = a (1)​ B. 语句 For k = 2 To 10 应改为 For k = 1 To 10​ C. If 语句中的条件 a (k) < a (min) 应改为 a (k) < min​ D. 语句 MinVal = min 应改为 MinVal = a (min)​ 【答案】D​ 【解析】该函数目的是返回数组中的最小数，min 初始设为 1 无意义，应设为数组第一个元素值，但这不是主要错误；循环从 2 开始没问题；条件判断逻辑正确；错误在于最后返回的应是最小的数值 a (min)，而不是最小数的下标 min，所以选 D。 14.在窗体中对控件进行操作，正确的是（ ）。 A.单击控件的边框可选中多个控件 B.按Delete键可删除选中的控件 C.拖动控件的标题栏可移动控件位置 D.右击控件可直接打开代码窗口 【答案】B 【解析】按住Ctrl键再单击控件可选中多个控件，A错误；按Delete键可删除选中的控件，B正确；拖动控件的非边框区域可移动控件位置，C错误；双击控件可打开代码窗口，右击控件通常弹出快捷菜单，D错误。 15.对话框在关闭之前，能继续执行应用程序其他部分的是（ ）。 A.模态对话框 B. 非模态对话框 C. 输入对话框 D. 输出对话框 【答案】B 【解析】模态对话框在关闭前会阻止用户与应用程序其他部分交互，必须关闭该对话框才能继续操作；非模态对话框则允许用户在不关闭它的情况下与应用程序其他部分交互；输入对话框和输出对话框是按功能分类，不是按是否阻塞程序执行分类，所以选B。 16.下列关于MDI父窗体和子窗体关系的叙述，正确的是（ ）。 A.MDI子窗体可以脱离MDI父窗体单独存在 B.MDI父窗体只能有一个子窗体 C.MDI子窗体最大化时，其标题会显示在MDI父窗体标题栏 D.MDI子窗体最小化时，其图标显示在任务栏 【答案】C 【解析】MDI子窗体必须在MDI父窗体中存在，不能脱离，A错误；MDI父窗体可包含多个子窗体，B错误；MDI子窗体最大化时，其标题与MDI父窗体标题合并显示在MDI父窗体标题栏，C正确；MDI子窗体最小化时，其图标显示在MDI父窗体内，而不是任务栏，D错误。 17.以下属于顺序文件写操作的访问方式是（ ）。 A.Input B. Output C. Random D. Binary 【答案】B 【解析】顺序文件的写操作访问方式是Output；Input用于顺序文件的读操作；Random用于随机文件访问；Binary用于二进制文件访问，所以选B。 18.为使文本框同时具有水平和垂直滚动条，应将ScrollBars属性值设置为（ ）。 A. 0 B. 1 C. 2 D. 3 【答案】D 【解析】ScrollBars属性值为0表示无滚动条；1表示水平滚动条；2表示垂直滚动条；3表示同时有水平和垂直滚动条，所以选D。 19.文本框控件中，用于设置文本框内文本字体颜色的属性是（ ）。 A.BackColor B. ForeColor C. FontColor D. TextColor 【答案】B 【解析】BackColor用于设置文本框背景颜色；ForeColor用于设置文本框内文本的字体颜色；文本框控件中没有FontColor和TextColor属性，所以选B。 20.要在命令按钮上显示图像，正确的操作是（ ）。 A.直接设置Picture属性 B.先将Style属性设置为0，再设置Picture属性 C.先将Style属性设置为1，再设置Picture属性 D. 无法在命令按钮上显示图像 【答案】C 【解析】命令按钮默认Style属性值为0（标准样式），此时无法显示图像；将Style属性设置为1（图形样式）后，才能通过设置Picture属性在按钮上显示图像，所以选C。 21.如果要使列表框允许多选，应将MultiSelect属性设置为（ ）。 A.0 B. 1 C. 2 D. 1或2 【答案】D 【解析】MultiSelect属性值为0时，不允许多选；值为1时，简单多选，可通过单击选择多个项目；值为2时，扩展多选，可通过Shift键或Ctrl键配合选择多个项目，所以允许多选应设置为1或2。 22.下列每组控件中，都含有滚动条的是（ ）。 A.PictureBox和Label B. ListBox和ComboBox B.TextBox和FileListBox D. DriveListBox和DirListBox 【答案】C 【解析】PictureBox和Label通常没有滚动条；ComboBox默认没有滚动条；TextBox和FileListBox都可以有滚动条；DriveListBox和DirListBox一般没有滚动条，所以选C。 23. 窗体上有一个图像框Picture1和一个命令按钮Command1，执行以下程序： Private Sub Command1_Click() Picture1.Picture = LoadPicture("c:\test.jpg") Picture1.Cls Picture1.Print "Hello" End Sub 执行结果是（ ）。 A.图像框显示图片且显示文字“Hello” B.图像框只显示文字“Hello”，无图片显示 C.图像框显示图片，不显示文字“Hello” D.图像框既无图片也无文字显示 【答案】B 【解析】LoadPicture函数将图片加载到图像框，但紧接着使用Cls方法清除了图像框中的内容，然后使用Print方法在图像框中输出“Hello”，所以图像框只显示文字“Hello”，无图片显示。 24.使用“保存”对话框的方法是（ ）。 A.在程序中用ShowSave方法显示“保存”对话框 B.双击工具箱中的“保存”对话框控件，添加到窗体后使用 C.单击CommonDialog控件，在窗体画出后将Action属性设为2 D.在程序中用Show方法显示“保存”对话框 【答案】C 【解析】在VB中，使用CommonDialog控件实现文件对话框功能。“保存”对话框对应的Action属性值为2，通过设置该属性并调用ShowOpen或ShowSave方法可显示“保存”对话框；工具箱中没有单独的“保存”对话框控件，B错误；Show方法不能直接显示“保存”对话框，D错误，所以选C。 25.在设计菜单时，若要添加一个菜单分隔项，则菜单分隔项的标题必须设置为（ ）。 A. 冒号 (:) B. 加号 (+) C. 减号 (-) D. 感叹号 (!) 【答案】C 【解析】在 Visual Basic 的菜单设计中，将菜单分隔项的标题设置为减号（-），就能在菜单中显示出分隔线，起到分隔不同菜单项组的作用，而冒号、加号、感叹号均无法实现此功能 。 二、判断题(本大题共10小题，每小题2分，共20分) 1.（ ）使用 Do...Loop While 语句时，循环体中的代码至少会被执行一次。 【答案】√ 【解析】Do...Loop While 语句的执行逻辑是先执行一次循环体，再判断 While 后的条件表达式。若条件为真，则继续执行循环体；若条件为假，则终止循环。所以循环体至少会被执行一次，该表述正确。 2.（ ）程序执行End 语句，所有正在运行的窗体、程序进程都会被立即终止，整个应用程序随即结束运行。 【答案】√​ 【解析】End 语句在 VB 中用于结束程序的运行，无论程序处于何种状态，执行到 End 语句时，会直接终止整个应用程序，关闭所有相关资源，所以该说法正确。 3.（ ）在同一过程内，定义两个相同标识符的变量会导致程序出现命名冲突错误。​ 【答案】√ 【解析】为保证程序正常运行和变量识别的准确性，在同一过程内，标识符必须唯一，若重复定义相同标识符的变量，就会产生命名冲突，程序会报错，所以该说法正确。 4.（ ）Data 控件在窗体运行时默认处于隐藏状态，需手动设置才可见。 【答案】× 【解析】Data 控件在窗体运行时默认是可见的，若想使其不可见，需将其 Visible 属性设置为 False，原说法错误。 5.（ ）ReDim 语句只能用于事件过程或通用过程内，对动态数组大小进行重新定义。 【答案】√ 【解析】ReDim 语句的使用范围限定在事件过程或通用过程中，不能在模块级或全局声明部分使用，该表述符合 VB 语法规则，是正确的。 6.（ ）如果需要在窗体上添加多个相同类型的控件,可以先漆加一个控件并设置其属性，然后通过复制操作来添加其他控件。 【答案】√ 【解析】在 VB 中，为提高开发效率，当需要添加多个相同类型且属性一致的控件时，可先添加一个控件并设置好属性，接着使用复制和粘贴操作来添加其他控件。新复制出的控件会继承原控件的大部分属性，仅名称等少数属性会自动调整，所以该表述正确。 7.（ ）驱动器列表框控件在程序运行时，会展示用户系统中所有磁盘驱动器的列表供用户选择。 【答案】√ 【解析】驱动器列表框控件的主要功能就是显示系统中的磁盘驱动器列表，方便用户从中选取，该表述与控件功能相符，是正确的。 8.（ ）VB 中一旦定义了定长字符串，其内容和长度在程序运行过程中都无法改变。 【答案】× 【解析】定长字符串定义后长度不能改变，但内容是可以修改的。 9.（ ）系统功能设计明确了程序需要实现的各项功能模块，是程序设计的开端和核心架构。 【答案】√ 【解析】系统功能设计为 VB 程序搭建整体框架，确定程序要实现的功能，是程序设计的起始和关键部分，如同骨架支撑整个程序，该表述正确。 10.（ ）逻辑运算符的优先级高于比较运算符。 【答案】× 【解析】在 Visual Basic 中，比较运算符的优先级高于逻辑运算符。 三、名词解释题(本大题共4小题，每小题4分，共16分) 1.方法 【答案】方法是对象所具备的一些特定操作或行为。方法实际上是和对象相关联的函数或过程，借助调用对象的方法，能够让对象执行特定的操作。 2.编译错误 【答案】编译错误指对程序进行编译时所产生的错误，也称为语法错误，这种错误是由于程序中的语句违反了 Visual Basic 的语法规则而引起的。 3定长数组 【答案】定长数组是预先确定了元素个数的数组。在声明定长数组时，需要明确指定数组的大小，并且在程序运行期间，数组的大小不能改变。 4.标准模块 【答案】标准模块扩展名为.bas，主要用于存放公共的变量、常量、通用过程等。这类模块是应用程序内其他模块访问的过程和声明的容器。 四、简答题(本大题共4小题，每小题6分，共24分) 1.简述VB语句书写格式。 【答案】VB语句书写格式如下： （1）不区分大小写。VB 对关键字有自动转换大小写功能。 -------------1分 （2）标点符号需要在英文状态下输入。-------------1分 （3）语句以 Enter 键结束。一般情况下“一句一行”。-------------1分 （4）当多个语句写在同一行上，每个语句之间必须用冒号（：）来分隔。 当一行语句过长时，可以用“空格+下划线”来续行。续行符写在末尾，剩余代码则可换行书写。-------3分 2.Visual Basic 6.0 的表达式分为哪几类？ 【答案】Visual Basic 6.0 的表达式主要分为以下几类： （1）算术表达式：由算术运算符和操作数组成，用于进行数学运算。 -------------1.5分 （2）字符串表达式：由字符串运算符和字符串常量、变量组成，用于对字符串进行连接操作。 -------------1.5分 （3）关系表达式（比较表达式）：由关系运算符和操作数组成，用于比较两个值的大小关系，结果是布尔值（True 或 False）。-------------1.5分 （4）逻辑表达式：由逻辑运算符和关系表达式或布尔值组成，用于进行逻辑运算，结果也是布尔值。-------------1.5分 3.简述MsgBox函数及功能。 【答案】MsgBox 函数用于在一个对话框中显示消息，等待用户单击按钮，并返回一个表示用户单击了哪个按钮的整数值。其语法格式如下： -------------1分 MsgBox(prompt[, buttons][, title][, helpfile, context]) prompt ：必需参数，在对话框中显示的消息文本。 -------------1分 buttons ：可选参数，用于指定对话框中显示的按钮、图标类型以及默认按钮等。 -------1分 title ：可选参数，对话框的标题栏文本。 -------------1分 helpfile ：可选参数，帮助文件的名称。 -------------1分 context ：可选参数，帮助文件中主题的上下文编号。-------------1分 4.控件的通用属性有哪些？ 【答案】（至少写出四点） （1）Name 属性：用于标识控件的名称，在代码中通过这个名称来引用控件。 （2）Caption 属性：对于一些可以显示标题的控件，Caption 属性用于设置其显示的标题文本。 （3）Visible 属性：用于设置控件是否可见，值为 True 时控件可见，值为 False 时控件隐藏。 （4）Enabled 属性：用于设置控件是否可用，值为 True 时控件可用，用户可以与之交互；值为 False 时控件不可用，呈现灰色状态，用户无法操作。 （5）Left 和 Top 属性：Left 属性指定控件相对于其容器（如窗体）左边的位置，Top 属性指定控件相对于其容器顶部的位置，单位通常是缇（Twip）。通过设置这两个属性可以调整控件在容器中的位置。 （6）Width 和 Height 属性：分别用于设置控件的宽度和高度，单位同样通常是缇。 （7）Font 属性：用于设置控件上显示文本的字体、字号、颜色等格式。 五、综合题(本大题共1小题，每小题10分，共10分) 编写一个 Visual Basic 程序，要求实现以下功能： （1）定义一个包含 10 个元素的整数数组。 （2）从键盘输入 10 个整数，将这些整数存储到数组中。 （3）找出数组中的最大值和最小值。 （4）输出最大值和最小值。 【答案】 Option Explicit Sub Main() Dim arr(1 To 10) As Integer Dim i As Integer Dim max As Integer Dim min As Integer For i = 1 To 10 ' 从键盘输入10个整数 arr(i) = Val(InputBox("请输入第 " & i & " 个整数：")) Next i ' 初始化最大值和最小值 max = arr(1) min = arr(1) sum = 0 For i = 1 To 10 ' 找出最大值和最小值 If arr(i) > max Then max = arr(i) End If If arr(i) < min Then min = arr(i) End If Next i ' 输出结果 MsgBox "最大值是：" & max & "最小值是：" & min End Sub 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $$