2012届毕业班vb清考试卷

《2012届毕业班vb清考试卷》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、姓名:学号:院系:年级专业:(密封线内不答题)……………………………………………………密………………………………………………封………………………………………线……………………………………线………………………………………_____________________…东莞理工学院（本科）试卷（2012届清考卷）2011--2012学年第二学期《VisualBasic程序设计》试卷开课单位：计算机学院，考试形式：闭卷，允许带笔入场注意：请务必将答案填写在答题卷上，否则视为答题无效。一、单选题(30小题，每小题1

2、.5分，共45分)1、以下不属于VisualBasic系统的文件类型是____________。A、.frmB、.batC、.vbpD、.vbg2、Visual Basic 是一种面向对象的程序设计语言，_________不是面向对象系统所包含的三要素。A、属性B、变量C、事件D、方法3、在VB中通过____________属性来设置字体颜色。A、FontColorB、ForeColorC、BackColorD、ShowColor4、若要使命令按钮不可操作，要对________属性设置。 A、Enabl

3、edB、Visible C、BackcolorD、Caption5、"x是小于100的非负数"，用VB表达式表示正确的是____________。A、0 <= x 0r  x < 100B、0 <= x < 100 C、0 <= x And x < 100D、0 <=x , x < 1006、设a=21，b=75，则执行c=Int((b-a)*rnd+a)+1后，c的值为_______。A、1～76之间B、22～75之间C、22～76之间D、1～95之间7、设a=2，b=3，c=4，d=5，下列表达式a

4、>b AND c<=d OR 2*a>c的值是_______。A、TrueB、FalseC、-1D、18、用于获得字符串S从第5个字符开始的3个字符的函数是_______。《高级语言程序设计》试卷第7页共7页 A、Mid$(S,5,3)B、Middle(S,5,3)  C、Right$(S,5,3) D、Left$(S,5)9、字符串“东莞NewsCenter”的长度是_______。A、15B、13C、12D、1610、语句Print"Theansweris";20/4-2的结果为_______。A、

5、Theansweris20/4-2B、Theansweris3C、Theansweris"20/4-2"D、非法语句11、如下数组声明语句中，数组a包含元素的个数为。Dima(-2to2,5)A、25B、20C、30D、2412、下列循环语句能正常结束循环的是。A、I=5B、I=1DoDoI=I+1　I=I+2LoopUntilI<0　　LoopUntilI=10C、I=10D、I=6Do　　DoI=I+1I=I-2LoopwhileI>0LoopUntilI=013、执行下面的程序段后，x的值为___

6、______。x=5Fori=1To20Step2x=x+i5NextiA、24B、23C、21D、2214、如下数组声明语句，正确。A、Dima(3,4)AsIntegerB、DimA[3,4]AsIntegerC、DimA(n,n)AsIntegeD、DimA(3:4)AsInteger15、要使定时器控件每隔1分钟产生一个Timer事件，应将其Interval属性值设置为____________。A、10000B、60000C、60D、6000《高级语言程序设计》试卷第7页共7页姓名:学号:院系

7、:年级专业:(密封线内不答题)……………………………………………………密………………………………………………封………………………………………线……………………………………线………………………………………16、运行以下程序后，显示的结果为____________。DimA(10)ForI=1to10A(I)=2*INextIPrintA(A(2))A、程序有错误语句B、4C、2D、817、RGB函数通过红、绿、蓝三基色混合产生某种颜色，某语法为RGB(红,绿,蓝)，括号中红、绿、蓝三基色的成分使用0～25

8、5之间的整数。若使用三个滚动条分别输入三种基色，为保证输入数值有效，则应设置滚动条的____________属性.A、Max和MinB、Smallchange和LargeChangeC、Scroll和ChangeD、Value18、要从磁盘上读入一个文件名为“C:t1.txt”的顺序文件，下列正确。A、F=”C:t1.txt”OpenFForInputAs#1B、F=”C:t1.txt”Open“F”ForInputAs#２C、Ope