第8套上机考试试题5 z' g: u W# ^1 ]
一、基础操作题
- o) V- ]5 J9 x$ D0 ?5 u 下面出现的“考生文件夹”均为c:\wexam\20060001。
* n* R' z7 L4 I, W& e; W+ S8 b! L1 O 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。7 r6 Q: o# z5 v: N) p- m/ K7 ?2 W
1.在名为Form1的窗体上画一个文本框,名称为Text1,其初始内容为0;画一个命令按钮,名称为Cmd1,标题为“开始计数”;再画一个名称为Timer1的计时器。要求程序开始运行时不计数,单击“开始计数”按钮后,则使文本框中的数每秒加1。注意,程序代码中不得使用任何变蹙,窗体界面如图8-1所示。
\; s1 j( J; r) ~2 a4 A" q - t: |9 Y0 s3 b3 D4 r% E7 I" H
图8-1
( S4 K! H) O2 Q+ O/ n 注意:保存时必须存放在考生文件夹下,窗体文件名为kt1.frm,工程文件名为kt1.vbp。* h+ V+ v8 H/ T
2.在名称为Form1的窗体上画一个图片框,名称为Picture1;一个垂直滚动条,名称为VScroll1;一个命令按钮,名称为Commandl,标题为“设置属性”。通过“属性”窗口在图片框中装入一个图形(文件名为pic1.jpg,位于考生文件夹下),图片框的宽度与图形的宽度相同,图片框的高度任意,如图8-2所示。编写适当的事件过程,要求程序运行后,如果单击命令按钮,则设置垂直滚动条的属性如表8-1所示。
8 W# @ L0 s2 y/ C 表8-1 1 [. B- d& z( Q
Min 100
: S& L* T! o# |* U* v. _! Z; z9 f( CMax
6 `. q4 y* [: c1 Z8 S% r) [3 U2400 C" W. L' R7 d) v+ ], T
LargeChang
- t+ @; F" i+ E T0 ]200) N4 X0 j% ]0 Z7 e) A; o- C
SmallChange
; t0 Y4 z# v2 m* X3 Y0 {% T. j. C201 D5 U7 X* f7 B3 U( V
之后可以通过移动滚动条上的滚动块来放大或缩小图片框的高度。运行后的窗体如图8-3所示。要求程序中不得使用任何变量。
+ l) @$ d' R ]7 c+ o: D/ e& J
" z6 B5 X5 T9 |) W 图8-21 }9 \0 c7 m2 D' h
& @$ T5 s2 b4 o p8 W0 M( v 图8-3
) \( _4 N7 J( t! s* F" ]& j7 Q# Q9 w( Z 注意:保存时必须存放在考生文件夹下,工程文件名为kt2.vbp,窗体文件名为kt2.frm
- f" I) w6 ?9 M. p" S9 M" v2 } 二、简单应用题
0 k# L, L; f. S4 r# `# D 下面出现的“考生文件夹”均为c:\wexam\20060001。0 t* z* L, e1 ^3 z" {9 x0 r: i8 `2 l
在名为Forml的窗体上绘制…个名称为Lab1的标签,标题为“口令窗口”:绘制个文本框,名称分别为Text1和Text2,都没有初始内容;再绘制3个命令按钮,名称分别为Cmd1、Cmd2和Cmd3,标题分别为“显示”、“隐藏”和“复制”,在开始运行时,向Text1中输入的所有字符都显示“*’,单击“显示”按钮后,在Text1中显示所有字符,再单击“隐藏”后,Text1中的字符不变,但显示的都是“?”,单击“复制”后,把Text1中的实际内容复制到Text2中,如图8-4所示。要求如下:$ u7 F8 [ Q, P
' c$ N; E6 N0 {9 J
图8-40 v" d6 k% T, P# @
(1)在属性窗口中,把窗体的标题改为“口令窗口”。2 B6 }# s* ?- F4 h q# M0 V
(2)建立适当的事件过程,完成上述功能。每个过程中只允许写一条语句,且不能使用变量。
$ S4 d5 o1 i. F% t" V2 h- J# G (3)保存时,工程文件名为kt3.vbp,窗体文件名为kt3.frm。
5 m B" X; {6 N \ 2.在考生文件夹下有工程文件kt4.vbp及其窗体文件kt4.frm,该程序是不完整的,请在有“?”号的地方填入正确内容,然后删除“?”及所有注释符(即“'”号),但不能修改其他部分,保存时不得改变文件名和文件夹。其运行界面如图8—5所示。 g' [' j, L8 F' L
本题描述如下: ( z3 F, H0 W2 U1 q$ v
在窗体上有一个名为Text1的文本框,有两个命令按钮,名称分别是C1和C2,标题分别是“读入”和“计算并保存”。要求程序运行后,单击c1按钮,将文本文件in6.txt中的所有数字读到数组art中,并在文本框中显示出来,随后c1按钮变为无效:然后单击C2按钮,求出数组arr中各元素的平方并返回相应的元素值,例如arr(2)=2,则令arr(2)=arr(2)*arr(2)=4,把计算后的数组值全部写入考生文件夹下的文本文件out6.txt中,并在文本框中显示出来.最后C2按钮也变为无效。- o0 k$ G5 }1 k/ h1 X+ w
' \4 V2 V4 p( @/ w4 ~ 图8-55 P! H2 a0 W$ e+ L0 \
三、综合应用题
/ W2 `( G! p; X8 c, R 下面出现的“考生文件夹”均为c:\wexam\20060001。# L% D1 ~4 x3 S6 ]) `! d4 x
新建一个工程文件,在窗体Form1中设置两个控制按钮,名称分别为Command1和Command2,标题分别为“计算”和“存盘”:设置一个文本框,名称为Text1。要求在窗体模块的通用过程中定义一个CalculateArea的Sub过程,该过程的功能是计算出一个矩形面积并在Text1中显示出来。当单击“计算”按钮时.先弹出两个输入对话框,在两个对话框中用户可以分别输入该矩形的长和宽,并在文本框中显示出矩形面积。程序运行时的窗体界面如图8-6所示。
; p) r8 B5 {2 M& b; \- U " X5 K4 ]; N+ ~" F/ s3 r$ n
图8-6: _4 O# {) x! Z# H! u0 ~
第8套参考答案与解析8 O! I7 o7 d. ]) Q
一、基本操作题
5 p. I& E. }- @1 v 1.【解析】本题主要考查计时器控件的使用。设计界面,然后编制相应的事件处理程序。/ s3 @8 |2 L/ n/ X9 n
(1)建立界面并设置控件属性,见表8-1。 Q7 N" k8 G+ T1 t& T N! s
表8-1 |- }+ b. `4 D
5 |) R7 F/ f% k
控件类型 名称属性值NameText1文本框Text空值NameTimer1定时器Interval1000EnabledFalseNameCmd1命令按钮Caption开始计数6 y3 z( S9 R5 E$ u' X" E
& \- ] b# u$ ~/ b' v6 u
(2)Timer1.Enabled初始化为False,单击命令按钮将它的值改为True。' o# P3 [, ?4 _6 I3 H9 D8 c
' |% J8 y% H/ u (3)编写Timer1_Timer()处理程序时,需要单独处理刚开始计数的情况。' k2 b& G# J0 [7 L
' D% a& M& ^/ y5 M, E( x% N, N
, W* |% j: ^) |5 q+ u' A (4)调试运行程序,正确则按要求保存工程和窗体文件。6 l& Z7 u" p1 ^7 V1 _* q4 q
2.【解析】本题主要考查图片框的使用。控制图片的大小,就是调整图片框Width属性和Height属性的值,Width属性和Height属性分别决定控件的宽和高。要想通过改变滚动条的Value属性值来调节图片框的大小,需要将滚动条的Value属性值和图片框的高联系起来,使滚动条的Value属性值改变时触发Change事件。' ]; b6 `7 P, H
【解题步骤】
# f3 X V) ]7 H5 ` (1)建立界面并设置控件属性。程序中用到的控件及其属性见表8-2。) _( m) l6 ^: K& B5 f( D
表8-2 |