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

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

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

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

基本操作题

1.(1)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,通过设置参数使其形状为圆形;添加一个名称为Label1的标签,标题为“形状”,标签的大小能够根据标签内容的字数、大小而定;添加一个名称为Text1的文本框,文本框最多能够显示5个字符,文本框中初始内容为“圆形”,如图所示。

注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjt1.frm,工程文件名为sjt1.vbp。

(2)在名称为Form1的窗休上添加—个名称为Label1的标签,字号大小为四号,标题为“等级考试”,如图1所示。通过设置属性使标签初始为不显示。请编写适当的程序,使得运行程序时,窗体的标题立即变为“标签”,单击窗体时,显示标签,如图2所示。

注意:存盘时,将文件保存至考生文件夹下,且窗体文件名保存为sjt2.frm,工程文件名保存为sjt2.vbp。要求程序中不得使用变量,每个事件过程中只能写—条语句。

(1)【操作步骤】

步骤1:新建一个窗体,按照题目要求建立形状控件、标签控件及文本框控件并设置其属性,如图3.27所示。程序中用到的控件及属性见表3.36。

[*]

步骤2:调试并运行程序,关闭程序后按题目要求存盘。

(2)【操作步骤】

步骤1:新建一个窗体,按照题目要求建立控件并设置其属性,如表3.37所示。

[*]

步骤2:编写程序代码。

参考答案

Private Sub Form_Click()

Labe11.ViSible=True

End Sub

Private Sub Form_Load()

Form1.Caption=\\

解析:

简单应用题

2.(1)考生文件夹中有工程文件sjt3.vbp。窗体上有一个名称为Label1、标题为“标签控件”的标签;有一个名称为Command1、标题为“命令按钮”的命令按钮。单击上述两控件中的任一控件,则在标签Labe12中显示所单击控件的标题内容(标题内容前添加“单击”二字),下图是单击命令按钮后的窗体外观。请去掉程序中的注释符,把程序中的?改为正确的内容。

注意:考生不得修改窗体文件中已经存在的控件和程序,最后程序按原文件名存盘。

(2)在考生文件夹下有一个工程文件sjt4.vbp,其窗体上有一个由八个图片框控件组成的控件数组、两个命令按钮及一个计时器控件,如图1所示。

程序功能:

将计时器控件设置为每隔0.5秒触发一次Timer事件。运行程序时,只显示下标为0的图片框控件数组元素,其他图片框均不可见。单击“开始”按钮,数组中的每个图片框自左至右依次显示,时间间隔为0.5秒,产生“月亮”从左向右移动的效果,如图2所示。月亮移到右端后再从左端重新开始。单击“停止”按钮,“月亮”停止移动。

要求:按照题目要求设置控件属性,去掉程序中的注释符,把程序中的?改为正确的内容。

注意:不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名进行存盘。

(1)【操作步骤】

步骤1:打开本题工程文件。

步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。

参考答案

Private Sub Command1 Click()

Call ShowName(Command1)’将Command1控件传入ShowName

End Sub

Private Sub Labe11_Click()

Call ShowName(Labe11) ’将Labe1控件传入ShowName

End Sub

Private Sub ShowName(c As Contro1) ’两者类型都为控件

If Type Of c IS CommandButton Then

Labe12.Caption=\\

解析:

综合应用题

3.考生文件夹下有一个工程文件sjt5.vbp。运行程序后,从文件中读出数据,将其放入一个5×5的二维数组a中。请编写程序,找出数组a中每行的最大值及该值在行中的次序(列下标),并将所找到的结果分别保存到一维数组b、c中(a中第一行的最大值保存在b(1)中,最大值的列次序保存在c(1)中)。

注意:不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名存盘。程序调试通过后,命令按钮的事件过程必须至少执行一次。

【操作步骤】

步骤1:打开本题工程文件。

步骤2:打开代码编辑窗口,在指定位置编写如下代码。

参考答案

Max=a(i,1)将每行第一个数作为该行最大值,以便进行比较

For j=1 To 5

If Max<a(i,j)Then ’依次循环比较该行其他数,如有更大值,则替换max值

Max=a(i,j)

End If

b(i)==Max ’最大值存入数组b中

If Max=a(i,j)Then c(i)=j ’最大值的下标存入数组C中

Next j

步骤3:调试并运行程序,关闭程序后按题目要求存盘。

解析:

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

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

推荐资源

客服

扫码添加客服微信

热线

官方客服

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

电话客服:

客服微信:pujinet

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

公众号

扫码关注微信公众号