VB基础练习一

《VB基础练习一》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、VB基础练习一一、选择题1.在VisualBasic代码窗II屮，语句Bookl.Text=z/Windows操作系统"屮的Book1是(A)属性名(B)属性值(C)窗口名(D)对象名2.在VisualBasic代码窗口中，语句Student.Text二〃宋知国"中的Text是(A)属性名(B)属性值(C)对象名(D)窗口名3.在VisualBasic工程设计中,双击窗体中的对象后,出现的是(A)工程窗口(B)工具箱(C)代码窗口(D)属性窗口4.在VisualBasic工程设计中,要在文本框Text

2、l中显示“你好”,则下列操作正确的是(A)在Text属性名中输入“你好”(B)在Caption属性名中输入“你好”(C)在Font属性名屮输入“你好”(D)在Name属性名中输入“你好”5.在VisualBasic工程设计中，要在标签对象Start上显示文字“欢迎使用本系统!二则下列属性屮应改变的属性是(A)Caption(B)Width(C)Font(D)Height6.在VisualBasic屮，表示字符串型的数据类型名是(A)Long(B)Integer(C)String(D)Boolean7.

3、在VisualBasic中，语句DimbAsDouble所定义的变量b是(A)整数型(B)单精度实数型(C)双精度实数型(D)长整数型&在VisualBasic中，变量a中的数值是整数而且可能在-32768〜32767范围之外，则变量a的数据类型应定义为(A)日期型(B)整数型(C)长整数型(D)逻辑型9.在VisualBasic屮，下列属于字符串常量的是(A)Abs(lOO)(B)〃100〃(C)ValClOO")(D)1/10.在VisualBasic中，将数字字串转换为数值的函数是(A)Str(

4、x)(B)Vai(x)(C)Abs(x)(D)Int(x)11.在VisualBasic中，表达式Int(-4.5)的值是(A)-5(B)4(C)4.5(D)512.银行给用户计算利息吋，结果中会产生很多位小数，但在支付吋，是以“元”为单位，按吩”结算的，即结果保留二位小数，并对第三位小数进行四舍五入。假设结算的利息是x元，在VisualBasic中，上述算术问题的表达式应是(A)Tnt(x*10+0.5)/10(B)Int(x*100+0.5)/100(C)lnt(x*100)/100(D)Int(

5、x*100+0.5)/109.圆周长的计算公式为L=2兀a,其中a为圆半径。在VisualBasic中，能正确表示2兀a的表达式是(A)2na(B)2*n*a(C)2・只・a(D)2*3.1416*a10.下列属于正确的VisualBasic表达式是(A)a+

6、b

7、(B)3b-2a(C)2・b(D)b+511.在VisualBasic中，设a二3,b二5,则关系表达式a>b的值是(A)-1(B)1(C)True(D)False12.VisualBasic函数Fix(x)的作用是截掉数据的小数部分。已知

8、a是实数，当关系表达式Fix(A)二a为真时，则表示a是(A)负数(B)正数(C)整数(D)小数13.在VisualBasic中，已知x、y均是正整数，关系表达式Int(x/y)=x/y为真时，则表示(A)x不能被y整除(B)x能被y整除(C)x与y—定相等(D)x小于y14.下列能表示“x小于10且y大于0"的VisualBasic逻辑表达式是(A)x<10Andy>0(B)x<10:y>0(C)x<10Ory>0(D)x<10,y>015.在VisualBasic中，已知a、x^y均是正整数，当逻

9、辑表达式(amodx=0)And(amody二0)为真时，则表示(A)a是x的倍数，但不是y的倍数(B)q既是x的倍数，又是y的倍数(C)a是x的倍数或者是y的倍数(D)a既不是x的倍数，也不是y的倍数16.在VisualBasic中,逻辑表达式Not(x<0)为真，则说明x是(A)负数(B)正数(C)非正数(D)非负数17.下列属于正确的VisualBasic赋值语句的是(A)x+y二10(B)x+y-10=0(C)x,y二10(D)x=10-y18.对于VisualBasic语句Ifi=lThen

10、j=l,下列说法正确的是(A)i二1和j=l均为赋值语句(B)i二1和j=l均为关系表达式(C)i二1为关系表达式，j二1为赋值语句(D)i=l为赋值语句，j二1为关系表达式二、程序阅读与程序填空题1.有如下VisualBasic程序段：a二"Good"b=〃Bye〃c=a+b该程序段运行后，变量c的值是o1.有如下VisualBasic程序段：x二110Ifx>100ThenLabel1.Caption=〃你超速了!"ElseLabel1.Captio