第27套参考答案与解析
一、基本操作题
1．【解析】首先按题目要求在窗体上画出一个文本框、一个标签和一个命令按钮，并分别设置它们的属性。在初始设置时，Labell标签的Visible属性为False，刚运行时Label1标签是不可见的。运行结束后将Visible属性赋值为False时，可以隐藏控件。若将Text1.Text直接赋值给Label1.Caption，可以在Label1标签中显示其内容。
(1)控件及其主要属性设置见表27-1。
表27-1
| 控件 |
控件名 |
属性名 |
属性值 |
|
|
BorderStyle 。 |
l |
| 标签 |
Labell |
Visbile |
False |
续 表
控件 |
控件名 |
属性名 |
属性值 |
| 文本框 |
Text1 |
Text |
|
| 命令按钮 |
Commandl |
Caption |
显示 |
(2)参考代码：
2．【解析】首先按题目要求在窗体上画出一个文本框和一个水平滚动条，并分别设置它们的属性。当单击滚动条时会触发Change事件，将HScroll1.Value赋值给Text1.Height和Text1.Width能改变文本框的高度和宽度值。LargeChange属性返回和设置当用户单击滚动块和滚动箭头之间的区域时，滚动条控件的Value属性值的改变量；SmallChange属性返回或设置当用户单击滚动箭头时，滚动条控件Value属性值的改变量。
(1)控件的主要属性设置见表27-2。
表27-2
| 控件 |
控件名 |
属性名 |
属性值 |
|
|
Min |
500 |
| Max |
2000 |
| 水平滚动条 |
Hscroll1 |
LargeChange |
50 |
| SmallChange |
20 |
| 文本框 |
Text1 |
Text |
|
2)参考代码：
二、简单应用题
1．【解析】首先按题目要求在窗体上画一个列表框、一个文本框和两个单选按钮，并分别设置它们的属性。列表框的Addltem方法是将项目(字符串表达式)添加到ListBox(列表框)中；列表框的RemoveItem方法是在ListBox控件中删除指定的一项：ListCount属性返回控件的部分列表项目个数；List属性返回或设置列表框控件的部分列表的项目。
(1)控件的主要属性设置见表27－3。
表27－3
| 控件 |
控件名 |
属性名 |
属性值 |
| 单选按钮 |
Option1 |
Caption |
添加项目 |
| 单选按钮 |
Option2 |
Caption |
删除项目 |
| 列表框 |
List1 |
|
|
| 文本框 |
Text1 |
Text |
|
(2)程序提供代码：
参考代码：
2．【解析】本题主要考查数组的降序排列。Lbound()函数和函数ubound()分别返回数组的最小下标值和最大下标值。在数组排序的运算过程中，一般都采用双重循环对一维数组下标进行操作，设置双重循环的初值和终值是重点。如果初值和终值设置得合理，就能提高运算速度，否则就会出错，甚至会产生数组的下标值溢出。降序的判断条件：前数组值>后数组值，否则为升序。
程序提供代码：
参考代码：
三、综合应用题
1．【解析】首先按题目要求在窗体上画一个文本框，并分别设置它们的属性。试题中提供的子函数ReadData()的功能是从datain1.txt文件中读取数据并赋给数组；WriteData()是向dataout.txt文件中写计算结果；窗体变量Sum用于存储求值之和；满足小于50的条件为Arr(i)<50，回车换行符为clar(13)&Chr(10)。
(1)控件的主要属性设置见表27-4。
表27-4
| 控件 |
控件名 |
属性名 |
属性值 |
|
|
Text |
|
| 文本框 |
Text1 |
MultiLine |
True |
| ScrollBars |
2 |
(2)菜单项的属性设置见表27-5。
表27-5
| 标题 |
名称 |
内缩符号 |
可见性 |
| 读入数据 |
Read |
无 |
True |
| 计算并输出 |
Calc |
无 |
True |
| 存盘 |
Save |
无 |
True |
(3)程序提供代码：
参考代码：
上一页 [1] [2]
责任编辑：cyth
