计算机二级VB语言程序设计考试练习题及答案.docx
- 文档编号:26513999
- 上传时间:2023-06-20
- 格式:DOCX
- 页数:6
- 大小:15.07KB
计算机二级VB语言程序设计考试练习题及答案.docx
《计算机二级VB语言程序设计考试练习题及答案.docx》由会员分享,可在线阅读,更多相关《计算机二级VB语言程序设计考试练习题及答案.docx(6页珍藏版)》请在冰豆网上搜索。
计算机二级VB语言程序设计考试练习题及答案
计算机二级VB语言程序设计考试练习题及答案
程序设计是计算机二级VB考试必考的知识点,下面小编为大家带来了计算机二级VB语言程序设计考试练习题及答案,欢迎大家阅读!
计算机二级VB语言程序设计考试练习题及答案 1.以下程序段运行的结果为(B)(单)
PrivateSubForm_Click()
MyDate=#7/21/1997#
PrintFormat(MyDate,"m/d/yy")
PrintFormat(MyDate,"yyyy年m月dd日")
EndSub
/21/971997年7月21日
1997年7月21日
/7/211997年7月21日
/21/9797年7月21日
2.以下程序段运行的结果为(B)(单)
PrivateSubForm_Click()
MyTime=#9:
21:
30PM#
MyDate=#7/21/1997#
PrintTab
(2);Format(MyDate,"mmmm-yy")
PrintTab
(2);Format(MyTime,"hh:
mm:
ssA/P")
EndSub
9:
21:
30P
09:
21:
30P
9:
21:
30P
9:
21:
30
3.以下程序段运行的结果为(C)(单)
PrivateSubForm_Click()
MyDate=#7/21/1997#
PrintFormat(MyDate,"dddd,mmmm,dd,yyyy")
EndSub
,07,1997
,07,21,1997
,July,21,1997
,07,21,1997
4.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
PrivateSubText1_LostFocus()
IfNotIsNumeric(Text1)Then
MsgBox"帐号有非数字字符错误"
=""
else
MsgBox"帐号正确"
EndIf
EndSub
当在text1文本框中输入字符"abc"之后,单击命令按钮,结果为(B)(单)
A.显示对话框,提示信息为"帐号正确"
B.显示对话框,提示信息为"帐号有非数字字符错误"
C.程序出错
D.没有任何提示
5.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
PrivateSubText1_LostFocus()
IfNotIsNumeric(Text1)Then
MsgBox"帐号有非数字字符错误"
=""
else
MsgBox"帐号正确"
EndIf
EndSub
当在text1文本框中输入数字123456之后,单击命令按钮,结果为(A)(单)
A.显示对话框,提示信息为"帐号正确"
B.显示对话框,提示信息为"帐号有非数字字符错误"
C.程序出错
D.没有任何提示
6.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
PrivateSubCommand1_Click()
DimIAsInteger
If "Gong"Then
I=MsgBox("密码错误",5+vbExclamation,"输入密码")
IfI4Then
End
Else
=""
EndIf
Else
MsgBox"密码帐号正确!
"
EndIf
EndSub
若在text1中输入字符串"Gong",则程序运行结果为(A)(单)
A.显示对话框,提示"密码帐号正确!
"
B.显示对话框,提示"密码错误"
C.程序出错
D.没有任何提示
7.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
PrivateSubCommand1_Click()
DimIAsInteger
If "Gong"Then
I=MsgBox("密码错误",5+vbExclamation,"输入密码")
IfI4Then
End
Else
=""
EndIf
Else
MsgBox"密码帐号正确!
"
EndIf
EndSub
若在text1中输入字符串"gong",则程序运行结果为(B)(单)
A.显示对话框,提示"密码帐号正确!
"
B.显示对话框,提示"密码错误"
C.程序出错
D.没有任何提示
8.在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
PrivateSubCommand1_Click()
DimIAsInteger
If "Gong"Then
I=MsgBox("密码错误",VbRetryCancle+vbExclamation,"输入密码")
IfI4Then
End
Else
=""
EndIf
Else
MsgBox"密码帐号正确!
"
EndIf
EndSub
若在text1中输入字符串"123",显示"密码错误"对话框,关于此对话框描述正确的是(A)(单)
A.显示对话框中有“重试”按钮
B.显示对话框中有“确定”按钮
C.显示对话框中有“是”按钮
D.以上说法都不正确
9.在窗体中建立三个文本框,名称分别为text1、text2和text3,还有一个名称为label1的标签,一个名称为command1的命令按钮,编写如下代码:
PrivateSubCommand1_Click()
Dimx!
y!
z!
t!
x=Text1
y=Text2
z=Text3
Ifx t=x
x=y
y=t
EndIf
Ify t=y
y=z
z=t
Ifx t=x
x=y
y=t
EndIf
EndIf
=x&","&y&","&z
EndSub
当在文本框text1、text2和text3中分别输入5、3和8,则标签显示的结果为(C)(单)
,5,8
,3,8,5,3
10.以下程序段:
PrivateSubForm_Load()
DimNopAsInteger,OpAsString*1
Num1=3
Num2=2
Nop=val(Inputbox("请输入1-4之间的整数"))
SelectCaseNop
Case1
Op="+"
Result=Num1+Num2
Case2
Op="-"
Result=Num1-Num2
Case3
Op="×"
Result=Num1*Num2
Case4
Op="÷"
Result=Num1/Num2
EndSelect
Label1=Num1&Op&Num2&"="&Result
EndSub
窗体运行后,输入1,则label1的标题显示结果为(A)(单)
+2=5
=1
×2=6
÷2=
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 二级 VB 语言程序设计 考试 练习题 答案