- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
                        查看更多
                        
                    
                试卷第  PAGE   1 页共  NUMPAGES   2 页
《二级VB》上机模考试卷(2)(计算机二级考试VB考试卷)
姓名:_____________ 年级:____________ 学号:______________
题型
选择题
填空题
解答题
判断题
计算题
附加题
总分
得分
评卷人
得分
一、选择题(每小题1分,共40小题,共40分。)第 1 题 以下程序运行后的窗体如图所示,其中组合框的名称是Combo1,已有列表项如图所示;命令按钮的名称是Command1。  Private,Sub Command1_Click(  )If Not Check(Combo1.Text)ThenMsgBox(“输入错误”)Exit SubEnd IfFor k=0 To Comb01.ListCount-1If Comb01.Text=Combo1.List(k)ThenMsgBOX(“添加项目失败”)Exit SubEnd IfNext kCornbol.AddItem Combo1.TextMsgBOX(“添加项目成功”)End SubPrivate Function Check(ch As String)As Booleann=Len(ch)For k=1 To nc$=Ucace(Mid(ch,k,1))If c”A”Or c<”Z”ThenCheck=FalseExit FunctionEnd IfNext kCheck=TrueEnd Function程序运行时,如果在组合框的编辑区中输入“Java”,则单击命令按钮后产生的结果是(  )。    A 显示“输入错误”    B 显示“添加项目失败”    C 显示“添加项目成功”    D 没有任何显示第 2 题 下列关系表达式中,其值为True的是( )。    A “XYZ”<”XYz”    B “VisualBasic”<”visualbasic”    C “the”=“there”    D “Integer”“Int”第 3 题 如果一个变量未经定义就直接使用,则该变量的类型为(  )。    A Inieger    B Byte    C Boolean    D Variant第 4 题 Fibonacci数列的规律是:前2个数为1,从第3个数开始,每个数是它前2个数之和,即1,1,2,3,5,8,13,21,34,55,89,…某人编写了下面的函数,判断大于1的整数X是否是Fibonacci数列中的某个数,若是,则返回True,否则返回False。Function Isfab(x As Integer)As BooleanDim ii As Integer,b As Integer,C As Integer,flag As Booleanflag=Falsea=1:b=1Do While xBc=a+ba=bb=cIf x=b Then flag=TrueLoopIsfab=flagEnd Function测试时发现对于所有正整数X,函数都返回False,程序需要修改。下面的修改方案中正确的是(  )。    A 把a=b与b=C的位置互换    B 把c=a+b移到b=C之后    C 把Do While xb    D 把If x=b Then flag=True改为If x=a Then flag True第 5 题 下面可以产生20~30(含20和30)的随机整数的表达式是(  )。    A Int(Rnd*10+20)    B Int(Rnd*11+20)    C Int(Rnd*20+30)    D Int(Rnd*30+20)第 6 题 设有如下变量声明语句:Dim a,b As Boolean则下面叙述中正确的是(  )。    A a和b都是布尔型变量    B a是变体型变量,b是布尔型变量    C a是整型变量,b是布尔型变量    D a和b都是变体型变量第 7 题 如果一个直线控件在窗体上呈现为一条垂直线,则可以确定的是(  )。    A 它的Y1、Y2属性的值相等    B 它的 X1、X2属性的值相等    C 它的X1、Y1属性的值分别与X2、Y2属性的值相等    D 它的 X1、X2属性的值分别与Y1、Y2属性的值相等第 8 题 若窗体上的图片框中有一个命令按钮,则此按钮的Left属性是指(  )。    A 按钮左端到窗体左端的距离    B 按钮左端到图片框左端的距离    C 按钮中心点到窗体左端的距离    D 按钮中心点到图片框左端的距离第 9 题 执行语句Dim X,Y As Integer后,( 
                您可能关注的文档
- (1.计算机基础知识)(1.1 计算机发展(42))计算机二级考试OFFICE高级应用考试卷.doc
- (CET(4))大学英语四级(CET4)考试卷.doc
- (CET(4)A卷试题大学英语四级(CET4)考试卷.doc
- (CET(4)考试真题)大学英语四级(CET4)考试卷.doc
- (CET(4)考试真题)大学英语四级(CET4)考试卷_0.doc
- (CET(4)考试真题)大学英语四级(CET4)考试卷_1.doc
- (CET(4)考试真题)大学英语四级(CET4)考试卷_2.doc
- (CET(4)真题试卷)大学英语四级(CET4)考试卷.doc
- (CET(4)真题试卷)大学英语四级(CET4)考试卷_0.doc
- (CET(4)真题试卷)大学英语四级(CET4)考试卷_1.doc
- 《二级VB》上机模考试卷(4)(计算机二级考试VB考试卷).doc
- 《二级VB》上机模考试卷(5)(计算机二级考试VB考试卷).doc
- 《二级VF》考前押密试题(1)(计算机二级考试VFP考试卷).doc
- 《二级VF》考前押密试题(2)(计算机二级考试VFP考试卷).doc
- 《二级VF》考前押密试题(3)(计算机二级考试VFP考试卷).doc
- 《二级VF》考前押密试题(4)(计算机二级考试VFP考试卷).doc
- 《二级VF》考前押密试题(5)(计算机二级考试VFP考试卷).doc
- 《二级VF》模拟试卷(1)(计算机二级考试VFP考试卷).doc
- 《二级VF》模拟试卷(2)(计算机二级考试VFP考试卷).doc
- 《二级VF》模拟试卷(3)(计算机二级考试VFP考试卷).doc
 原创力文档
原创力文档 
                        

文档评论(0)