- 1、本文档共5页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
全国计算机等级考试二级VB笔试各题型答题技巧
全国计算机等级考试二级VB笔试各题型答题技巧
一、熟悉考试题型,掌握基本做题技巧。
VB考试只有选择题和填空题两种题型,其中选择题共30题,分值70分,填空题共15小题,分值30分。这两种题型的解题方法有所不同,考生在备考时要深化对基本概念和知识点的理解,并注重实践,同时要多做一些针对性的练习,特别是历年真题,从中找出规律性的东西以及解题技巧。
A、选择题解题技巧:
常见的选择题解法有“排除法”.我们从历年四次考试中分别挑选一个选择题进行举例,希望大家引起重视,并能熟练掌握这种解题技巧。
例1:(2003年09月考题)设有如下通用过程,在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim x As Integer
x = 10
y = 5
y = f(x)
Print x; y
End Sub
Public Function f(x As Integer)
Dim y As Integer
x = 20
y = 2
f = x * y
End Function
程序运行后,如果单击命令按钮,则在窗体上显示的内容是
A)10 5 B)20 5 C)20 40 D)10 40
【答案】C
【分析】对于传值和传地址的题目,解题时我们可以运用适当的排除技巧,如针对上面的题目我们可以进行分析后直接得出结果:
本题中,X初值是10,Y初值是5.
但由于X传地址,所以要互相影响,故在主程序调用函数F(X)后,打印语句中X不可能是原来的10,因此可以马上排除答案A和D;而Y是靠函数本身传递值,故在函数过程中F得到新值40后就如同传地址一样把结果传给了Y.故本题的答案是C.
例2:(2003年04月考题)在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:
Private X As Integer
Private Sub Command1_Click()
X=5:Y=3
Call proc(X,Y)
Label1.Caption=X
Label2.Caption=Y
End Sub
Private Sub proc(ByVal a As Integer,ByVal b As Integer)
X=a* a
Y=b+b
End Sub
程序运行后,单击命令按钮,则两个标签中显示的内容分别是
A)5和3 B)25和3 C)25和6 D)5和6
【答案】B
【分析】本题中的X是窗体级变量,所以X在过程之间传递参数时相当于传地址,互相要影响。同时,过程之间本身有A和B要与X和Y传值。由于本题中的X原先是5,则程序执行后X应该改变,故先排除答案A和D.另外,B和Y传的是值,它们互不影响,故又可以排除答案C.因此最终答案是B.
例3、(2002年09月考题)在窗体上画一个命令按钮,名称为Command1.程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1.在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0.能够正确实现上述功能的代码是
A) Private Sub Command1_Click()
x=InputBox(“请输入整数”)
a=F1(Val(x))
Print a
End Sub
Function F1(ByRef b As Integer)
If b Mod 2=0 Then
Return 0
Else
Return 1
End If
End Function
B) Private Sub Command1_Click()
x=InputBox(“请输入整数”)
a=F1(Val(x))
Print a
End Sub
Function F1(ByRef b As Integer)
If b Mod 2=0 Then
F1=0
Else
F1=1
End If
End Function
C) Private Sub Command1_Click()
x=InputBox(“请输入整数”)
F1
您可能关注的文档
- 企业营销通操作指南.doc
- 传统动画与计算机动画技术.pdf
- 传统双系统方案.doc
- 传王A6系统介绍.pdf
- 低压保护电器的选择与整定97804.doc
- 低压保护电器的选择与整定98636.doc
- 余瑧-地质实习.doc
- 低端四核机性能对比.xls
- 低压保护电器的选择与整定97913.doc
- 二维码名片设计欣赏.pdf
- 2025年智能快递驿站行业政策与市场机遇报告.docx
- 2025年校园安全防范中新能源电动巡逻车采购可行性分析.docx
- 2025年智能垃圾分类智慧监管平台在智慧旅游区的应用前景研究.docx
- 2025年智能家居报告:人工智能伦理风险的法律责任与用户隐私保护.docx
- 2025年智能垃圾分类与垃圾分类信息化管理结合的可行性研究.docx
- 2025年智慧社区远程医疗诊断中心在基层医疗机构运营管理中的应用报告.docx
- 2025年智慧社区:老年活动广场智能化升级研究.docx
- 2025年智能社区新能源电动巡逻车市场应用前景分析报告.docx
- 2025年智能垃圾分类智慧监管平台在垃圾分类回收与处理中的智能化改造路径.docx
- 2025年本土半导体材料产业链国产化战略布局报告.docx
文档评论(0)