首页 > 全部 > 二级VB > 国家二级VB机试(上机操作)模拟试卷549

国家二级VB机试(上机操作)模拟试卷549

本单篇文档共3504字,内容预览3600字,预览为有答案版,源文件无水印,下载后包含无答案空白卷版和有答案版,同时也有计算机类NCRE全国计算机二级整科真题模拟题,讲义课件,思维导图,易错高频题等下载。
二级VB 章节练习 2069人下载
价格: 1.00 原价:¥9.60
收藏

国家二级VB机试(上机操作)模拟试卷549

基本操作题

1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

(1)在名称为Form1的窗体上画一个名称为cmdOpen的命令按钮,标题为“打开文件”,再画一个名称为cdlOpen的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框。请按下列要求设置属性和编写代码:

①设置适当属性,使对话框的标题为“打开文件”;设置适当属性,使对话框的“文件类型”下拉式组合框中有二行:“文本文件”、“所有文件”(如图1-236所示),默认的类型是“所有文件”。

②编写命令按钮的事件过程,使得单击按钮可以弹出打开文件对话框。要求:程序中不得使用变量,事件过程中只能写一条语句。

注意:存盘时必须存放在考生文件夹下,工程文件名为vbsj1.vbp,窗体文件名为vbsj1.frm。

(2)在名称为Form1的窗体上画一个图片框(名称为Pic1)、一个垂直滚动条(名称为Vsb1)和一个命令按钮(名称为cmdSet,标题为“设置属性”),通过属性窗口在图片框中装入一个图形(文件名为pic1.jpg,位于考生目录下),图片框的宽度与图形的宽度相同,图片框的高度任意(如图1-237所示)。编写适当的事件过程。程序运行后,如果单击命令按钮,则设置垂直滚动条的如下属性:

Min=100

Max=2400

LargeChange=200

SmallChange=20

之后就可以通过移动滚动条上的滚动块来放大或缩小图片框的高度。运行后的窗体如图1-238所示。要求程序中不得使用任何变量。

第1小题

【操作步骤】

步骤1:新建一个“标准EXE”工程,选择【工程】→【部件】命令,打开“部件”对话框,从其列表中选中“MicroSoft Common Dialog Control6.0”项目,单击“确定”按钮。

步骤2:在窗体Form1中加入一个命令按钮和一个通用对话框,其相关属性设置如表2-116所示。

[*]

步骤3:在代码编辑窗口中,编写“打开文件”按钮的单击事件过程:

参考代码:

Private Sub cmdOpen_Click()

cdlOpen.ShowOpen

End Sub

步骤4:按要求将文件保存至考生文件夹中。

第2小题

【操作步骤】

步骤1:新建一个“标准EXE”工程,在窗体Form1中画一个图片框和一个水平滚动条,在属性设置窗口中设置其相关属性,属性及其值如表2-117所示。

[*]

步骤2:打开代码编辑窗口,分别编写命令按钮的Click事件过程和垂直滚动条的Change事件过程。

参考代码:

Private Sub cmdSet_Click()

Vsb1.Min = 100

Vsb1.Max = 2400

Vsb1.LargeChange = 200

Vsb1.SmallChange = 20

End Sub

Private Sub Vsb1_Change()

Pic1.Height = Vsb1.Value

End Sub

步骤3:按要求将文件保存至考生文件夹中。

解析:

简单应用题

2.(1)在考生目录下有一个工程文件vbsj3.vbp,包含了所有控件和部分程序,如图1-239所示。

第1小题

【操作步骤】

步骤1:打开考生文件夹中的工程文件vbsj3.vbp,依次选中窗体中的两个文本框,将其Alignment 属性值设置为1-Right Justify。

步骤2:双击窗体中的“计算”命令按钮,在打开的代码编辑窗口中编写其单击事件过程。

参考代码:

Private Sub cmdCal_Click()

Select Case cboFun.Text

Case \\

解析:

综合应用题

3.在考生文件夹下有一个工程文件vbsj5.vbp,其功能是:①单击“读数”按钮,则把考生文件夹下in5.dat文件中的100个0~999之间的整数读入数组a 中;②单击“计算”按钮,则对这100个数中的水仙花数(当一个数的值等于该数中各位数字的立方和时,此数被称为水仙花数。如153=13+53+33,所以153就是一个水仙花数)求平均值,并对该平均值截尾取整后显示在文本框txtResult中。

窗体中给出了所有控件(如图1-241所示)以及“读数”按钮的Click事件过程,请为“计算”按钮编写适当的事件过程实现上述功能。

【操作步骤】

步骤1:打开考生文件中的本题工程文件vbsj5.vbp,在代码编辑窗口指定位置编写以下代码:

参考代码:

Dim sum As Integer

Dim n As Integer

Dim x As Integer

Dim y As Integer

Dim z As Integer

For i = 1 To 100

x = Int(a(i) / 100)

y = Int((a(i) – x * 100) / 10)

z = a(i) – x * 100 – y * 10

If a(i) = x ^ 3 + y ^ 3 + z ^ 3 Then

sum = sum + a(i)

n = n + 1

End If

Next

txtResult.Text = Int(sum / n)

步骤2:按要求将文件保存至考生文件夹中。

步骤3:按 <F5>运行程序,先单击“读数”按钮,接着单击“计算”按钮,然后单击窗体右上角的关闭按钮结束程序。

解析:

本文档预览:3600字符,共3504字符,源文件无水印,下载后包含无答案版和有答案版,查看完整word版点下载

剩余未完,查看全文
收藏
国家二级VB机试(上机操作)模拟试卷549

推荐资源

客服

扫码添加客服微信

热线

官方客服

如遇问题,请联系客服为您解决

电话客服:

客服微信:pujinet

工作时间:9:00-18:00,节假日休息

公众号

扫码关注微信公众号