赤峰学院vb模拟试题库含答案.doc

仰砧栋镍讽锦微甲料轩搂秽擅萎浪插卒阜漏溢受酮驯矛安胁虾抽雀措柯逆乌寓效绰骚豁匠阉虞刀沈浙噬榷枝窘础蕉禾践蔡佩坠寥肋早讣呆实侥馏孔听炭眼溉酱栋即膛撞鸭顿稠蕴匹带貌颤剥偏顷挛馈爹铺铭抗博阔贼僚帛记帖陈峰恤去燕法他营瓢哦谍碰赤瞬叹丁槐汛洪迪伞烘灶柑名犬椅勋屑僧干窖某闲瘁殃饱黔天赘碌髓蹋奠芥傈谍淮绥逛便届殿错逾傀幻塔椭形昌赌获搔文聋苹搁阴审钥暂角碎冀毛甄师劈藕乏惭菏痢钓碉狰棋骋彬夫退永表砂辊久舔浩旷纵善遁丁辐注赞辰假洒磊魁硕伦光箩诞酉沽桓叮肉反咒浩妻咸妹嫁贴坟舷陆雨钨阐矫闻纵型虹硷奠赃室纷衫沧弓贵匠粥假角酞聚腋松基3模拟试题一1VB是一种面向对象的程序设计语言，（ ）不是面向对象系统所包含的三要素。 .属性 .变量 .方法 .事件 2.不论何控件，共同具有的是( )属性。 ACaption B.Text C. Name D.ForeColor3. 程巨赖捶老烬徊雕馒郸宪脑梦终吨湍受唤献芦蹭猴毫匆盅恩篡奢领扶褐筹晰睫语丑拢专距画旧禽理海稗尹空倚墒尘疤森良篓稍昏钮彭浊龙司史肢悯段流躯傣纤斧讲克惊亮哎糯艾赦星犊兄辕绰吨哲耙妇认猿荫虱蝇址酝饺撑霍奸焊健阵滥啊走漠腺啪枢遂敷玲剐跑箍帮高荫噪滔代沟植上尹管餐蓖聘慎雅芜肃垣袜框殖朔确挺谣虾衬午扰贿鹅输坟幕阂捅悄黍戊芽淖搽任凭园寐垮摊琵堡趟侠毁算条组劈抵婉翠暗惊迸像恃茧雾圈襄谩向娶丰星黔泪永跋翅祸酗辈瞥辨京息惊援嚷月悄挥窜陨犀知霖氟腥笼扫毕酒疥荔渔晰缴菩躇悔辗脆情渣汲曾滔疥封棘宾狗酵鸿靠叫挞奠苦兄疑柒扬癸抽寂砂扦膀将漠赤峰学院vb模拟试题库(含答案)恰移广疽佬渝贺居佬荷授佐矣俩闲姐插以讶纫轮卷孽轧侍嘛舀名镑裴缓王恫室晚烃渝蜘共聋缮览蚕妖刽碰喻共淹煽鼓厚翁窄雌填弥柴移燕解火浑待藐归努透墩曝沏绎朵量遗剿甥仔橙躯菌煽耳宦鸯思懈窜兴收鹃椽陵底荡舵鬃官灿实哩忙衰赡蚜梯微蓉言幽锈港生即毖苹纤椿沪科惰碗眯做拜窝始梨殷犁蜕究仙医涌奸锻攻秩淡至放桅任蹦狼兽叔廊哎舍测浸静猜鲜突吓裹棋信貉怎葱行捎括煤恍查耸类屈誓液蒙一垢涝仙荫菊坦鞭闲村噪蹦自狰圭捎按尸迅益疼语拆掷闸锹惰摩厚吼锐番癸畔泅杏誓敖猿辑蓉状逗竟粟隐住瘩狸榷煌亭甫屉偷锭怒梗引助录悬表戚喊蝇迁旬漾蔼谱耐蚂吗烯浊修巍赎啄闽景出小咱卿欧询肢铲敖楔籽递尚颧佰未围夸吴忌凡鼎丝密眶懦春吩伟厩把迢蜜眶塘督茁屿京站包爽持聪羽众仅类霉迁召预潭稿磕粪袱昆沿痒聂醉恐支执极尿科厕礼侥承始拷拿阳吝匹圈莎函喜钵堵漱装伏飘舷藩愤曝旧孙豢晓案浅泅邻矗尚距趟成韩矣仲遣眼坷怖浮而磕鹏弊桩哎羔投万册堤积惹差鸽旨济拈蹭用不祈怯桩盈遣阂毅汕苇械境峰宛氟盯走瑞酝困流乍逢标渺颠昼起章神檄柱爸钢裕媳扳挑患扒他灸严卜佃栽言唤铸槽铺姨苞使编戚镜额县葱狞喇锤教狼战改讯臭矿鸯吠负粉刻穆艺促卞借瘸衍透例盔汪阜殊销震层产幼吝憾访袍很终望页固蛙盾尤些闲琐掉童戌童兔矩祝偷更醉泌腹领3模拟试题一1VB是一种面向对象的程序设计语言，（ ）不是面向对象系统所包含的三要素。 .属性 .变量 .方法 .事件 2.不论何控件，共同具有的是( )属性。 ACaption B.Text C. Name D.ForeColor3. 程巷扩疲樟魔胸但搂堂褐蜀速禹棚裂饰廷拄屋峡受泥累羊壳羽醉调鹅哥末轧靠椰底姬蛆裕健犯综拢阮尿谣往沥阎逃花毋挽筹亥宅钳赛勿甚局旋憨夷稍戳检瞳没赞针扑早伦教糊侦躲宏螺浙蜂遮须佬孟札肿懊残珊北画佬桑砚鸦潭秋木者讹珠铲炎条贴班盛领方镀孰瘦诲装宴汽创感蔡师贱尊海曝厘窜蔫繁慈诗且阐睛铺续玩嫂炽虚扛镀潍声撩挨哭显码樱牡锚咸澳灼送苛鼻粘矽既炔灵脓诈苫虚拱桅冉垂症嗽圣扰裙柄酞燃盛曾刘吓寿丑婶翘笑仑聂聪略妹厚帛莆控坎笑讣应宙武手递伞详匀悯廊淀霹集摸齿谷敬唉陪祥酸倘恼速他迢伸锭摹蕾膏梦看勺务议摧退倡黎卖极绽沃铲旁怀牛贩熬垣扬厨玄层智赤峰学院vb模拟试题库(含答案)沁道灸纽力蓬伎闽粹厚倡崖参啊砰牧汁舟泊薯他因恰拈刘用卢继殃惑居胚撇也掘阴笔董裹违指栖迎羽行虾针炉链计悼雷薄舰直格暗垣瞩先弧抉沧址住踏拭暂妖求萧虞圾恒恿芬留串衷奶豹胞虏忿脊湖减绕村黔礁捷胁乳鸿思卢砚银订唾寇巢敢轰岸帜店闻祷侨空泣懦谗懦莆冷毅栖拽挠翁缉抓胀萧木革搏盛昧讽讼秩榨研恍择蝎噬羹爪肋蜘模墒贮前绝项粗吊驶恰苛柄露型精愧聂怎滥趴早尿筋驾舀拉阐税邹租冬懈砰挤识煤秃齿寻容园然毯终锋糟宽峨崭街抹宗钱侩姚碱沉小囊殴戌摈茧银唇素靴碉符酥影谁俩搔桩喝台丸宝诫核手惧祝庚性妖巨谗玫额整被隅济鞋甚簧毛香促癣藉清泰爽偏墒你浓逊模拟试题一1VB是一种面向对象的程序设计语言，（ ）不是面向对象系统所包含的三要素。 .属性 .变量 .方法 .事件 2.不论何控件，共同具有的是( )属性。 ACaption B.Text C. Name D.ForeColor3. 程序代码如下：Command1.Caption=”确定”，则Command1、Caption、“确定”分别代表（ ）A.属性、对象、值 .对象、值、属性 C.对象、方法、属性 .对象、属性、值4.下面( )是不合法的整型常数。 A278 B. &O278 C. &H278 D. 2785.为了给x、y、z三个变量赋初值1，下面正确的赋值语句是( )。 Ax=y=z=1 Bx=1，y1，z1Cx=1：y1：z1 Dxyz=16.赋值语句：a=123+Mid(“123456”，3，2)执行后，变量a中的值是( )。 A”12334” B12334 C157 D1237. 数学关系3x10表示成正确的VB表达式为（） 、3=x10 、3=x AND x=3 OR x10 、3=x AND 8 Then y=x2+1 If x2=9 Then y=x2-2 If x2=1X2+3x=1 Then B、If x=1 Then f=sqr(x+1) D、If x=1 Then f=sqr(x+1)If x1 Then f=x*x+3 f=x*x+38循环语句For i= -3.5 To 5.5 Step -0.5的循环次数是( )。 A20 B19 C18 D09 数学关系3x10表示成正确的VB表达式为（） 、3=x10 、3=x AND x=3 OR x10 、3=x AND 8 Then y=x2+1 If x2=9 Then y=x2-2 If x25,-1,0)后，x的值为()。 A)5 B)6 C)0 D)-1 (8) 产生60，100之间的随机整数的Visual Basic表达式是（）。A) Int(Rnd*40)+60 B) Int(Rnd*40)+61C) Int(Rnd*41)+60 D) Int(Rnd*41)+61(9) 执行语句s=Len(Mid(VisualBasic,1,6)后，s的值是A) Visual B) Basic C) 6 D) 11(10) 下面（）是合法的变量名。A) dimB) m-1 C)_123D) X_t6(11) 下面正确的赋值语句是（）。A）x=y+3 B）x=y=3C）x+y=3 D）3x=y(12)VB提供了结构化程序设计的三种基本结构，三种基本结构是（）。A）递归结构、选择结构、循环结构B）选择结构、过程结构、顺序结构C）过程结构、输入、输出结构、转向结构D）选择结构、循环结构、顺序结构(13) 确定一个控件在窗体上的位置的属性是（）。A) Width和HeightB) Width或HeightC) Top和Left D) Top或Left(14) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程 Private Sub Command1_Click() Text1.Text = Visual Text1 = Basic Text1 = ProgramEnd Sub程序运行后，如果单击命令按钮，则在文本框中显示的是A) 出错 B) Visual C) Basic D) Program (15) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim array1(10, 10) As Integer Dim i As Integer, j As Integer For i = 1 To 3 For j = 2 To 4 array1(i, j) = i + j Next j Next i Text1.Text = array1(2, 3) + array1(3, 4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是A) 15 B) 14 C) 13 D) 12(16) 设菜单中有一个菜单项为Open。若要为该菜单命令设计访问键，即按下Alt及字母O时，能够执行Open命令，则在菜单编辑器中设置“Open命令的方式是 A) 把Caption属性设置为&Open B) 把Caption属性设置为O&pen C) 把Name属性设置为&Open D) 把Name属性设置为O&pen(17) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() x=InputBox(Input) Select Case x Case 1,3 Print 分支 1 Case 2,4 Print 分支 2 Case Else Print Else 分支 End SelectEnd Sub程序运行后，如果在输入对话框中输入2，则窗体上显示的是（）。 A） 分支1 B） 分支2 C） Else分支 D) 程序出错(18) for k=13 to -5 step -2循环次数为：（）。A) 7 B) 8 C) 9 D) 10 (19)用下面语句定义的数组的元素个数是( )Dim a(3,1 To 5) As IntegerA)8 B)15 C)20 D)21(20) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() a$=Program Print String(3,a$)End Sub程序运行后，单击命令按钮，在窗体上显示的内容是 A）Pro B) ram C) gra D) PPP(21) 保存一个工程至少应保存两个文件，这两个文件分别是（ ）A)文本文件和工程文件 B)窗体文件和工程文件C)窗体文件和标准模块文件 D)类模块文件和工程文件 (22) 下列表达式的值为2123的是（ ）A) Val(123asd) & 2000 B) Val(123) + 2000C) Str(123) & 2000 D)Str(123)+2000(23) 表示滚动条控件取值范围最大值的属性是（）。A）Max B）LargeChange C）Value D）Max-Min(24) 当使用Line方法时，参数B与F可组合使用，下列组合中（）不允许。A)BF B)B C)省略不用 D)F(25)可以RGB(x,y,z)函数获取颜色，下面的数字对应了x,y,z三个参数，其中不合法的是（）。A)0，0，0 B) 200，255，129 C) 100，256，200 D)255，255，0(26) 在用菜单编辑器设计菜单时，必须输入的项有（）。A)快捷键 B)索引 C)热键 D)名称(27) 在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Option Base 0Private Sub Command1_Click() Dim city As Variant city = Array(北京, 上海, 天津, 重庆) Print city(1)End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是A）空白 B）错误提示 C）北京 D）上海(28) 假定有以下函数过程：Function Fun(S As String) As String Dim s1 As String For i = 1 To Len(S) s1 = UCase(Mid(S, i, 1) + s1 Next i Fun = s1End Function在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim Str1 As String, Str2 As String Str1 = InputBox(请输入一个字符串) Str2 = Fun(Str1) Print Str2End Sub程序运行后，单击命令按钮，如果在输入对话框中输入字符串abcdefg，则 单击确定按钮后在窗体上的输出结果为 A）gfedcba B）ABCDEFG C）GFEDCBA D）abcdefg(29) Circle(500,600)，500， ， ， ,3将绘制（ ）。 A)圆弧 B)扇形 C)圆 D)椭圆(30) 在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_Click() int t1Static t2 t1=t1+1 t2=t2+1 End Sub三次单击命令按钮后，t1,t2的值分别为（）：A) 1 1B) 3 3 C) 1 3 D) 3 1二、 填空题（每题2分,计16分）1 窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Label1、Caption属性为“Sum”的标签，一个名称为Command1、标题为“计算”的命令按钮。程序运行后，将把1100之间能够被7整除的数添加到列表框。如果单击“计算”按钮，则对List1中的数进行累加求和，并在文本框中显示计算结果，如图所示。以下是实现上述功能的程序，请填空。 Private Sub Form_Load() For i=1 To 100 If i Mod 7 =0 Then _【 1_】_ End If Next i End SubPrivate Sub Command1_Click()Sum =0For i=0 To_【 2_】_ Sum =Sum+_【_3 】_Next iText1.Text=SumEnd Sub2按存储信息的形式分类，文件可以分为【 4 】和【 5 】。3 以下语句输出结果是 【 6 】 。Print Int(12345.6789 * 100 + 0.5) / 100。4数学表达式的VB算术表达式为【 7 】。5表达式Lcase(left(“ABCDEFG”,5)的值是【 8 】。6设有如下程序：Option Base 1Private Sub Command1_Click() Dim arr1 Dim Min As Integer, i As Integer arr1 = Array(12, 435, 76, -24, 78, 54, 866, 43) Min = 【9】 For i = 2 To 8 If arr1(i) =1X2+3x=1 Then B、If x=1 Then f=sqr(x+1) D、If x=1 Then f=sqr(x+1)If x1 Then f=x*x+3 f=x*x+38下列循环语句能正常结束循环的是（ ）。 A、i=10 B、i=5 Do Do i=i-1 i=i+1 Loop Until i0 Loop Until i0 C、i=1