2016年计算机二级vb考试试题
在2016年3月计算机考试之前,yjbys小编为大家推荐的是计算机二级VB考试题,希望对大家有所帮助!
1.基本操作(2小题,每题15分,共计30分)
Private Sub C2_Click()
ocus
End Sub
(2)在名称为Form1的窗体上画一个文本框,名称为Text1,其宽度为1000;再画一个滚动条,名称为HS1。其刻度值的范围是1000-2000。请编写滚动条的Change事件过程,程序运行后,如果移动滚动框,则可按照滚动条的刻度值改变文本框的宽度。运行时的窗体如图所示。程序中不能使用任何变量,事件过程只能写一条语句。
Private Sub HS1_Change()
h = e
End Sub
2.简单应用(2小题,每题20分,计40分)
(1)在考生文件夹下有一个工程文件,窗体上有两个列表框,名称分别为List1、List2,在List2中己经预设了内容,还有两个命令按钮,名称分别为C1、C2,标题分别为“添加”、“清除”。如图所示。程序的功能是在运行时,如果选中右边列标框中的一个列表项,单击“添加”按钮,则把该项移到左边的列表框中;若选中左边列标框中的一个列表项,单击“清除”按钮,则把该项移回右边的列表框中。文件中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。但不能修改程序中的其他部分,也不能修改控件的属性。最后把修改后的文件按原文件名存盘。
Private Sub Form_Load()
tem "性别"
tem "班号"
tem "简历"
tem "学号"
tem "姓名"
tem "年龄"
tem "照片"
End Sub
Private Sub C1_Click()
tem
veItem Index
End Sub
Private Sub C2_Click()
Dim k As Integer
k = 0
While (k < Count)
If cted(k) = True Then
tem
veItem k
End If
k = k + 1
Wend
End Sub
(2)在考生文件夹下有一个工程文件,请在Form1窗体上建立一个名称为Op1的单选按钮数组,含有三个单选按钮,其标题分别为“10!”“11!”“12!”,Index属性分别为0、1、2;再画一个名称为C1的'命令按钮,标题为“计算”;画一个名称为Text1的文本框,如图所示。程序的功能是在选定一个单选按钮并单击“计算”按钮后,可以计算出相应的阶乘值,在Text1中显示该阶乘值。请画出上述控件并编写程序。
Private Sub C1_Click()
Dim n As Integer, k As Integer
Dim fact As Long
For k = 0 To 2
If 1(k)e Then
n = Val(Left$(1(k)ion, 2))
End If
Next k
fact = 1
k = 1
Do While k < n
fact = fact * k
k = k + 1
Loop
= fact
End Sub
Private Sub Form_Unload(Cancel As Integer)
unload_sub
End Sub
Private Sub unload_sub()
Dim fn As String
fn = & ""
Open fn For Output As #1
Print #1,
Close #1
End Sub
3.综合应用(1小题,计30分)
在考生文件夹下有一个工程文件,其窗体上有一个文本框,名称为Text1,可以多行显示;有一个名称为CD1的通用对话框;还有三个命令按钮,名称分别为C1、C2、C3,标题分别为“打开文件”、“转换”、“存盘”,如图所示。
命令按钮的功能是:“打开文件”——弹出打开文件对话框,默认打开文件的类型为“文本文件”。选择考生文件夹下的文件后,该文件中的内容显示在Text1中;“转换”——把Text1中的所有小写英文字母转换成大写;“存盘”——把Text1中的内容存入考生文件夹下的文件中。在窗体中已经给出了部分程序,要求:
1) 请去掉程序中的注释符,把程序中的?改为正确的内容,但不能修改程序中的其他部分,也不能修改控件的属性。
2) 编写“转换”按钮的Click事件过程。最后把修改后的文件按原文件名存盘。
Private Sub C1_Click()
Dim a As String
er = "所有文件?*.*?文本文件?*文件?*"
erIndex = 2
on = 1
Open Name For Input As #1
Input #1, a
Close #1
= a
End Sub
Private Sub C2_Click()
= UCase()
End Sub
Private Sub C3_Click()
Name = ""
on = 2
Open Name For Output As #1
Print #1,
Close #1
End Sub
-
2017年江苏省计算机一级MSOffice考试试题
计算机网络就是通过线路互连起来的、资质的计算机集合,确切的说就是将分布在不同地理位置上的具有独立工作能力的计算机、终端及其附属设备用通信设备和通信线路连接起来,并配置网络软件,以实现计算机资源共享的系统。以下是关于计算机一级MSOffice考试试题,希望大...
-
计算机二级c语言题库2016
1.关于结构化程序设计原则和方法的描述错误的是(C)。A.选用的结构只准许有一个人口和一个出口B.复杂结构应该用嵌套的基本控制结构进行组合嵌套来实现C.不允许使用GOT0语句D.语言中若没有控制结构,应该采用前后一致的方法来模拟2.算法的空间复杂度是指(D)。A.算...
-
2016年国家计算机一级Photoshop题库及答案
2016年度第二次计算机等级考试正在备考,yjbys小编第一时间为大家分享计算机等级考试模拟试题及答案如下,一起来看看吧!1.填充图层包括下列哪些类型:ABCA.单色填充图层B.渐变填充图层C.图案填充图层D.快照填充图层2.下面哪种方法可以将填充图层转化为一般图层:BA.双...
-
重庆市2017年3月计算机等级考试时间安排
计算机可分为超级计算机、工业控制计算机、网络计算机、个人计算机、嵌入式计算机五类,较先进的计算机有生物计算机、光子计算机、量子计算机等。下面是小编整理的关于计算机等级考试时间安排,欢迎参考!一、考试时间2017年3月25日(以准考证为准)二、报考科目级别...