VB程序设计初步测试

《VB程序设计初步测试》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、第五模块VB程序设计初步测试一、单项选择题1．以下是合法的VisualBasic标识符是A．abcB．ConstC.9abcD.a#x2．表达式2^43的值是…………………………………………………………………（）A．5B．6C．7D．83．如果x=-25，则运行x=Abs(x)；x=Sqr(x)后，x的值是……………………………（）A．5B．-5C．25D.-254．在VisualBasic中，添加一个标签，在工具箱中要单击的控件是………………（）A．B．C．D.5．下列VisualBasic程序段运行后，变量max的值为…………………………

2、…………（）a=5：b=10：max=aIFb>maxThenmax=bA．5B．10C．5和10D.以上都不是6．下列VisualBasic程序段运行后，变量x的值为……………………………………（）x=3：y=77DoX=x+2LoopUntilx>Sqr(y)A．7B．8C．9D．107．要实现变量M的值与变量N的值进行交换，可用语句…………………………………（）A．X=M：M=N：N=XB．M=N：N=MC．M=ND．N=M8．如果a、b、c、d是一四位整数中千、百、十、个位上的数字，这个四位数在VB程序中可表示为………………………………

3、……………………………………………………（）A．abcdB．a+b+c+dC．a*1000+b*100+c*10+dD．以上都不对9．假定x是一个数值型变量，那么由函数组成的表达式Int(X/2)=X/2………………（）A．用于测试x是否偶数B．返回一个整数C．返回一个奇数D．用于测试X是否整数10．VB语言中的算术运算符：Mod表示什么；关系运算符：“不等于”用什么表示……（）A．乘方，≠B．除，!=C．取余数，<>D．乘，!=11．在VB编程中，我们使用函数与过程是为了…………………………………………（）A．使程序模块化B．使程序易于阅读C

4、．提高程序运行速度D．便于系统的编译12．下列有关数据控件常用属性表述错误的是……………………………………………()A．Connect用于指定数据控件所要链接的数据格式B．DatabaseName用于指定要链接的数据库的属性c．RecordSource用于指定Data控件所链接的数据库中的某一张表D．RecordType用于决定记录集是一个表、一个动态集或是一个快照11．有如下VisualBasic程序：PrivateSubCommandl_Click()S=OIfs<=99ThenForI=1To10S=s+jNextjElsePrint“程

5、序出错”EndIfPrint“最后s的值为：”；sEndSub请问它的控制结构包括哪些……………………………………………………………（）A．顺序结构B．条件结构C．顺序、条件和循环结构D．循环结构14．语句DimsAsInteger的功能是………………………………………………………（）A．定义一个字符型变量sB．定义一个字符型常量sC．定义一个整型变量sD．定义一个整型常量s15．数据的存储结构是指……………………………………………………………………（）A．数据所占的存储空间量B．数据的逻辑结构在计算机中的表示C．数据在计算机中的顺序存储方式D

6、．存储在外存中的数据16．有如下VisualBasic程序段：A=lOB=20A=A+BB=A—B该程序段运行后，变量A和B的值是…………………………………………………（）A．10和20B．30和20C.30和10D.30和-1017．有如下VisualBasic程序段：a=12Ifa<4ThenA=a-2ElsePrintaEndif该程序段运行后，变量a的值是………………………………………………………（）A.8B.10C.12D.1418．有如下VisualBasic程序段：DimsumAsDouble,xAsDoublesum=0n=0f

7、ori=1to5x=n/in=n+1sum=sum+xnexti该程序通过For循环计算一个表达式的值，这个表达式是…………………………()A．1+l/2+2/3+3/4B．1/2+2/3+3/4+4/5C．1+1/2+2/3+3/4+4/5D．1+l/2+1/3+1/4+l/519．下列程序段是计算哪个公式的………………………………………………………()s=0：t=1fori=1t010t=t*is=s+tnextiA．s=l+2+3+…+10B．s=1*2*3*…*10C．s=1!+2!+3!…+10!D.s=1+2*3+3*4+4*5+…

8、…+9*1020．PrivateSubCommandl_Click()DlmiAsInteger，jAsInteger，xAsIntegerX=4Fo