2017年计算机二级考试VB基础题及答案
平时的练习对我们的考试来说十分重要,练习做得多了自然熟能生巧。下面是本站小编为大家收集整理的2017年计算机二级考试VB基础题及答案,希望对大家学习有所帮助!
1.在窗体中建立三个文本框,名称分别为text1、text2和text3,还有一个名称为label1的标签,一个名称为command1的命令按钮,编写如下代码:
Private Sub Command1_Click( )
Dim x!, y!, z!, t!
x = Text1
y = Text2
z = Text3
If x < y Then
t = x
x = y
y = t
End If
If y < z Then
t = y
y = z
z = t
If x< y Then
t = x
x = y
y = t
End If
End If
ion = x & "," & y & "," & z
End Sub
当在文本框text1、text2 和 text3 中分别输入5、3和8,则标签显示的结果为(C)(单)
A.3,5,8
B.5,3,8 C.8,5,3
2.以下程序段:
Private Sub Form_Load( )
Dim Nop As Integer, Op As String * 1
Num1 = 3
Num2 = 2
Nop = val(Inputbox("请输入1-4之间的整数"))
Select Case Nop
Case 1
Op = "+"
Result = Num1 + Num2
Case 2
Op = "-"
Result = Num1 - Num2
Case 3
Op = "×"
Result = Num1 * Num2
Case 4
Op = "÷"
Result = Num1 / Num2
End Select
Label1= Num1 & Op & Num2 & "=" & Result
End Sub
窗体运行后,输入1,则label1的'标题显示结果为(A)(单)
A.3+2=5
B.3-2=1
C.3×2=6
D.3÷2=1.5
3.以下程序段运行的结果为(C)(单)
Private Sub Form_Click( )
MyDate = #7/21/1997#
Print Format(MyDate, "dddd,mmmm,dd,yyyy")
End Sub
A.21,07,1997
B.21,07,21,1997
ay,July,21,1997
ay,07,21,1997
4.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
Private Sub Text1_LostFocus( )
If Not IsNumeric(Text1) Then
MsgBox "帐号有非数字字符错误"
= ""
ocus
else
MsgBox "帐号正确"
End If
End Sub
当在text1文本框中输入字符"abc"之后,单击命令按钮,结果为(B)(单)
A.显示对话框,提示信息为"帐号正确"
B.显示对话框,提示信息为"帐号有非数字字符错误"
C.程序出错
D.没有任何提示
5.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
Private Sub Text1_LostFocus( )
If Not IsNumeric(Text1) Then
MsgBox "帐号有非数字字符错误"
= ""
ocus
else
MsgBox "帐号正确"
End If
End Sub
当在text1文本框中输入数字123456之后,单击命令按钮,结果为(A)(单)
A.显示对话框,提示信息为"帐号正确"
B.显示对话框,提示信息为"帐号有非数字字符错误"
C.程序出错
D.没有任何提示
6.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
Private Sub Command1_Click( )
Dim I As Integer
If <> "Gong" Then
I = MsgBox("密码错误", 5 + vbExclamation, "输入密码")
If I <> 4 Then
End
Else
= ""
ocus
End If
Else
MsgBox "密码帐号正确!"
End If
End Sub
若在text1中输入字符串"Gong",则程序运行结果为(A)(单)
A.显示对话框,提示"密码帐号正确!"
B.显示对话框,提示"密码错误"
C.程序出错
D.没有任何提示
7.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
Private Sub Command1_Click( )
Dim I As Integer
If <> "Gong" Then
I = MsgBox("密码错误", 5 + vbExclamation, "输入密码")
If I <>4 Then
End
Else
= ""
ocus
End If
Else
MsgBox "密码帐号正确!"
End If
End Sub
若在text1中输入字符串"gong",则程序运行结果为(B)(单)
A.显示对话框,提示"密码帐号正确!"
B.显示对话框,提示"密码错误"
C.程序出错
D.没有任何提示
8.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
Private Sub Command1_Click( )
Dim I As Integer
If <> "Gong" Then
I = MsgBox("密码错误", VbRetryCancle + vbExclamation, "输入密码")
If I <> 4 Then
End
Else
= ""
ocus
End If
Else
MsgBox "密码帐号正确!"
End If
End Sub
若在text1中输入字符串"123",显示"密码错误"对话框,关于此对话框描述正确的是(A)(单)
A.显示对话框中有“重试”按钮
B.显示对话框中有“确定”按钮
C.显示对话框中有“是”按钮
D.以上说法都不正确
9.以下程序段运行的结果为(B)(单)
Private Sub Form_Click( )
MyDate = #7/21/1997#
Print Format(MyDate, "m/d/yy")
Print Format(MyDate,"yyyy年m月dd日")
End Sub
A.7/21/97 1997年7月21日
B.7-21-97 1997年7月21日
C.97/7/21 1997年7月21日
D.7/21/97 97年7月21日
10.以下程序段运行的结果为(B)(单)
Private Sub Form_Click( )
MyTime = #9:21:30 PM#
MyDate = #7/21/1997#
Print Tab(2); Format(MyDate, "mmmm-yy")
Print Tab(2); Format(MyTime, "hh:mm:ss A/P")
End Sub
-97 9:21:30 P
-97 09:21:30 P
C.07-97 9:21:30 P
-97 9:21:30
-
2016年计算机二级MySQL数据库考试练习
在复习阶段多做练习可以帮助我们巩固知识和提高做题速度以及掌握做题技巧等。下面是本站小编为大家整理的2016年计算机二级MySQL数据库考试练习,希望可以帮助到大家的学习!习题一一、选择题下列哪种方法不能用于创建索引?_______A)使用CREATEINDEX语句B)使用CRE...
-
全国计算机等级二级考试java试题及答案
为了使广大考生在备战计算机等级考试时,更快的掌握相应知识点,下面是小编搜索整理的全国计算机等级二级考试java试题及答案,供参考练习,预祝考生们考出自己理想的成绩!1、如果在创建表中建立需要存放二进制数据文档的字段,其数据类型应当为___D___。A.文本类型B.货...
-
2021计算机二级《VB》上机操作题与答案解析
VisualBasic是一种由微软公司开发的结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。以下是本站小编搜索整理的一份2017计算机二级《VB》上机操作题与答案解析,供参考练习,希望对大家有所帮助!想了解更多相关信息请持续...
-
2016计算机二级《C语言》练习题及答案
2016年3月计算机考试即将在3月26日-29日进行,为了帮助大家顺利通过2016年计算机二级考试,下面本站小编为大家带来2016计算机二级《C语言》练习题及答案,供大家参考学习,预祝考生备考成功!1[单选题]有以下程序:程序运行后的输出结果是()。A.10,One*Dream!B.9,One*Dream...