国家二级VB机试（上机操作）模拟试卷550
基本操作题
1.请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。
（1）在名称为Form1的窗体上画一个名称为cmdOpen、标题为“打开”的命令按钮，然后画一个名称为cdlOpen 的通用对话框（如图1－242所示），编写适当的事件过程，使得运行程序时，单击“打开”命令按钮，则弹出打开文件对话框。在属性窗口中设置通用对话框的适当属性，使得对话框中显示的文件类型第一项为“所有文件”，第二项为“*.DOC”，默认的过滤器为.DOC文件。
注意：要求程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为vbsj1.vbp，窗体文件名为vbsj1.frm。
（2）在名称为Form1的窗体上画两个文本框，名称分别为txtSrc、txtObj，再画两个命令按钮，名称分别为cmdCopy、cmdDel，标题分别为“复制”、“删除”。程序运行时，在txtSrc 中输入一串字符，并用鼠标拖拽的方法选择几个字符，然后单击“复制”按钮，则被选中的字符被复制到txtObj 中（如图1－243所示）。若单击“删除”按钮，则被选择的字符从txtSrc中被删除。请编写两个命令按钮的Click过程完成上述功能。
第1小题
【操作步骤】
步骤1：新建一个“标准EXE”工程，在窗体Form1中加入一个命令按钮，其相关属性设置如表2－119所示。
[*]
步骤2：选择【工程】→【部件】命令，将弹出的“部件”对话框如图2－5所示，从列表中选中“MicroSoft Common Dialog Control6.0”项目，单击“确定”按钮。
[*]
步骤3：双击工具箱新添加的通用对话框（CommonDialog）图标，在窗体中加入一个通用对话框，其相关属性设置如表2－119所示。也可右击窗体中的通用对话框，选择【属性】命令，在打开的“属性页”对话框中设置其相关属性，如图2－6所示。
[*]
步骤4：双击窗体Form1中的“打开”按钮，在打开的代码编辑窗口中，输入如下代码：
参考代码：
Private Sub cmdOpen_Click()
cdlOpen.ShowOpen
End Sub
步骤5：按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1：新建一个“标准EXE”工程，在窗体Form1中画两个文本框和两个命令按钮，其相关属性设置如表2－120所示。
[*]
步骤2：在代码编辑窗口，分别编写“复制”和“删除”按钮的单击事件过程。
参考代码：
Private Sub cmdCopy_Click()
txtObj.Text = txtSrc.SelText
End Sub
Private Sub cmdDel_Click()
txtSrc.Text = Left(txtSrc.Text,
txtSrc. SelStart) & Mid _
(txtSrc.Text, txtSrc.SelStart
+ _
txtSrc.SelLength + 1)
End Sub
步骤3：按要求将文件保存至考生文件夹中。
解析：
简单应用题
2.（1）在考生目录下有一个工程文件vbsj3.vbp，窗体上有一个圆和一条直线（直线的名称为linClock）构成一个钟表的图案；有两个命令按钮，名称分别为cmdStart、cmdStop，标题分别为“开始”、“停止”；还有一个名为tmrClock 的计时器。程序运行时，钟表指针不动，单击“开始”按钮，则钟表上的指针（即linClock）开始顺时针旋转（每秒转6°，一分钟转一圈）；单击“停止”按钮，则指针停止旋转。运行时的窗体如图1－244所示。请设置计时器的适当属性，使得每秒激活计时器的Timer 事件一次；并编写两个按钮的Click事件过程。文件中已经给出了所有控件和部分程序，不得修改已有程序和其它控件的属性；编写的事件过程中不得使用变量，且只能写一条语句。最后把修改后的文件按原文件名存盘。
程序源码：
Dim lenth As Integer, q As Integer
Const PI = 3.14159
Private Sub Form_Load()
lenth = linClock.Y2_
linClock.Y1
q ＝ 90
End Sub
Private Sub tmrClock_Timer()
q ＝ q－ 6
linClock.Y1 = linClock.Y2 _
lenth * _
Sin(q * PI / 180)
linClock.X1 = linClock.X2＋
lenth * _
Cos(q * PI / 180)
End Sub
（2）在考生文件夹下有一个工程文件vbsj4.vbp，窗体上已经给出所有控件。程序运行时，单击“开始”按钮，则汽车图标向右运动；单击“停止”按钮则汽 车停止运动；移动滚动条上的滚动框，可以改变汽车的运动速度（滚动框向右移动，速度减慢）。如图1－245所示。
第1小题
【操作步骤】
步骤1：打开考生文件中的本题工程文件vbsj3.vbp，在属性设置窗口，设置计时器的性值为1000，Enabled 属性值为False。
步骤2：在代码编辑窗口，编写“开始”和“停止”按钮的单击事件过程。
参考代码：
Private Sub cmdStart_Click()
tmrClock.Enabled = True
End Sub
Private Sub cmdStop_Click()。
tmrClock.Enabled = False
End Sub
步骤3：按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1：打开考生文件中的本题工程文件vbsj5.vbp，在代码编辑窗口，去掉程序中的注释符“’”，将问号“?”
本文档预览：3600字符，共4567字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
