国家二级VB机试（上机操作）模拟试卷307
基本操作题
1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为Picture1的图片框(PictureBox)，高、宽均为1000。在图片框内再画一个有边框的名称为Image1的图像框(Image)。并通过属性窗口把考生目录下的图标文件POINTl1(香蕉图标)装入图像框Image1中，如图3—170所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Form1的窗体上画一个名称为Command1、标题为“保存文件”的命令按钮，再画一个名称为CommonDialog1的通用对话框。
要求：
①通过属性窗口设置适当的属性，使得运行时对话框的标题为“保存文件”，且默认文件名为out2；
②运行时单击“保存文件”按钮，则以“保存对话框”方式打开该通用对话框。如图3—171所示。
第1小题
步骤1：新建一个“标准ExE”工程，按要求画出控件并设置属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题
步骤1：新建一个“标准EXE”工程，选择[工程]→[部件]命令，在弹出的“部件”对话框的列表中选中“MicroSoft Common Dialog Control6．0”项目，单击“确定”按钮。
步骤2：在窗体Form1上画一个通用对话框和一个命令按钮并设置相关属性。
步骤3：打开的代码编辑窗口中，编写命令按钮的单击事件过程。
Private Sub Command1_Click()
CommonDialog1．Action=2
’或CommonDialog1．ShowSave
End Sub
步骤4：按要求将文件保存至考生文件夹中。
解析：第1小题：本题只需按照要求画出控件并设置属性即可，注意图像框要画在图片框内部。
第2小题：通用对话框的默认文件名由FileName属性设置，标题由DialogTitle属性设置。本题可在“保存文件”的单击事件过程中，用语句通过调用通用对话框的ShowSave方法或通过设置其Action属性值为2，使其以“保存对话框”方式打开。
简单应用题
2.(1)在考生目录下有一个工程文件sjt3．vbp。窗体上有个钟表图案，其中代表指针的直线的名称是Line1，还有一个名称为Label1的标签，和其他一些控件，如图3—172(a)所示。在运行时，若用鼠标左键单击圆的边线，则指针指向鼠标单击的位置，如图3—172(b)所示；若用鼠标右键单击圆的边线，则指针恢复到起始位置，如图3—172(a)所示；若鼠标左键或右键单击其他位置，则在标签上显示“鼠标位置不对”。文件中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的“?”改为正确的内容。程序中的oncircle函数的作用是判断鼠标单击的位置是否在圆的边线上(判断结果略有误差)，是则返回True，否则返回False。符号常量x0、y0是圆心距窗体左上角的距离；符号常量radius是圆的半径。
注意：不能修改程序中的其他部分和各控件的属性。最后把修改后的文件按原文件名存盘。
(2)在考生目录下有一个工程文件sjt4．vbp，窗体如图3—173所示。其功能是单击“输入数据”按钮，则可输入一个整数，n(要求：8≤n≤12)；单击“计算”按钮，则计算1!+2!+3!+…+n!，并将计算结果显示在文本框中；单击“存盘”按钮，则把文本框中的结果保存到考生目录下的out4．dat文件中。文件中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的“?”改为正确的内容，并编写“计算”按钮的Click事件过程。
注意：不得修改已经存在的内容和控件属性，在结束程序运行之前，必须用“存盘”按钮存储计算结果，否则无成绩。最后把修改后的文件按原文件名存盘。
第1小题
步骤1：打开本题工程文件sjt3．vbp，在代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。
参考代码：
Line1．Y2=Y
Line1．X2=Line1．X1
Line1．Y2=y0-750
Label1．Caption=\\
解析：第1小题：本题源程序在Form MouseDown事件过程中，先通过调用函数oncircle(X，Y)以判断鼠标单击的位置是否在圆的边线上，若在边线上，则接着判断当前按下的是否为鼠标左键，若为左键，则将直线Line1的终点位置设置为当前鼠标单击的位置，故第一个?处应改为：Y；若当前按下的不是左键，则直线Line1的终点位置设置为其原始位置，即Line1．X2=Line1．X1、Line1．Y2=y0-750。若鼠标单击的位置不在圆的边线上，则在标签上显示相关信息，故第4个?处应改为：Label1．Caption。
第2小题：本题源程序中，自定义函数f的功能是进行n!阶乘运算，它通过For循环连续n次将循环变量k的值乘以累积变量s(第一个?处s初值应为1)来实现，作为函数返同值第二个?处应改为：s。
在“计算”按钮的单击事件过程中，根据程序所要计算表达式的特点，源程序利用一个For循环依次计算表达式中各项的值并将其累加入变量s，计算表达式中各项的值通过调用白定义函数f(k)来实现的，最终计算结果显示在文本框中。
综合应用题
3.在考生文件夹下有一个工程文件sjt5．vbp，含三个窗体，标题分别为“启动”、“注册”、“登录”，运行时显示“启动”窗体，单击其上按钮时弹出对应窗体进行注册或登录。注册信息放在全局数组users中，注册用户数(最多10个)放在全局变量n中(均已在标准模块中定义)。
注册时用户名不能重复，且“口令”与“验证口令”须相同，注册成功则在“启动”窗体的标签中显示“注册成功”，否则显示相应错误信息。登录时，检验用户名和口令，若正确，则在“启动”窗体的标签上显示“登录成功”，否则显示相应错误信息。标准模块中函数finduser的功能是：在users数组中搜索用户名(即参数ch)，找到则返回该用户名在users中的位置，否则返回0。已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把Form2、Form3窗体文件中的“?”改为正确的内容。
注意：不得修改已经存在的程序和控件的属性，最后程序按原文件名存盘。
步骤1：打开考生文件夹中的本题工程文件
sjt5．vbp，在代码编辑窗口，去掉程序中的计释符“’”，
将问号“?”改为正确的内容。
参考代码：
’—注册窗体Form2-
n=n+1
Else If finduser(Trim$(Text1))＞0Then
Form1．Label1．Caption=\\
解析：本题源程序在“注册”窗体的“确定”按钮的单击事件过程中，先判断是否输入用户名，若没有输入则弹出提示信息，否则通过调用标准模块中的finduser
本文档预览：3600字符，共4026字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
