内容发布更新时间 : 2024/12/26 2:27:29星期一 下面是文章的全部内容请认真阅读。

VB综合练习题一

（数据类型、常量和变量、基本运算和表达式、赋值语句）

丽水二中：胡建友 一、选择题 1、\\,/,Mod,* 四个算术符中.优先级最低的是（ ） A） \\ B） / C） Mod D） * 2.下列字符串常量中,最大的是（ ） A） \ B） \ C） \ D） \3.表达式Int(8*sqr(36)*10^(-2)*10+0.5)/10的值是（ ） A）0.48 B）0.048 C）0 .5 D） 0.05 4.表达式Val(\的值是（ ） A）.123 B） 12.3 C） 0 D） .123E2CD 5.系统符号常量的定义可以通过（ ）获得 A）对象浏览器 B）代码窗口 C）属性窗口 D）工具箱 6.表达式(7\\3+1)*(18\\5-1)的值是（ ） A）8.67 B）7.8 C） 6 D）6.67 7.表达式5^2Mod 25\\2^2的值是（ ） A）1 B）0 C）6 D）4 8.表达式25 Mod 7的值是（ ） A）1 B）5 C）4 D）出错 9.下面表达式中,（ ）的运算结果与其他三个不同 A） Exp(-3.5) B） Int(-3.5)+0.5 C） -Abs(-3.5) D） -SQR(9)-0.5 10.关于算法，下列叙述正确的是（ ） A）算法可以用自然语言、流程图和伪代码来描述 B）算法只能用流程图来描述 C）算法不能用伪代码来描述 D）算法不可以用自然语言来描述 11．在Visual Basic工程设计中，双击窗体中的对象后，出现的是（ ） A）工程窗口 B）工具箱 C）代码窗口 D）属性窗口 12. 下列属于Visual Basic字符串常量的是（ ） A）1/2 B）Int(3.4) C）\ D）1+2 13. 在Visual Basic中，将数字字串转换为数值的函数是（ ） A）Str(x) B）Val(x) C）Abs(x) D）Int(x) 14.表达式Int( - 17.8) +Abs(17.8)的值是（ ） A） 0 B） 0.8 C） - 0.2 D） 0 34.8 15.表达式mid(\的值是（ ） A） how B） are C） you D） how are you 16.下列属于正确的Visual Basic赋值语句的是（ ） A） x+y=10 B） x+y-10=0 C） x,y=10 D） x=10-y 17.表达式Abs( - 5) +Len(\的值是（ ） A） 5ABCDE B） 0 5ABCDE C） 10 D） 0

18.圆周长的计算公式为L=2πa，其中a为圆半径。能正确表示2πa的表达式是（ ） A）2πa B）2*π*a C）2?π?a D）2*3.1416*a

19.函数Len(Str(Val(\的值为（ ）

A） 11 B） 5 C） 6 D） 8

20.在Visual Basic中，若x=3.1415926，则表达式Int(x*100+0.5)/100的值是( ) A） 3.14 B） 3.146 C） 314 D） 314.6 21.“如果下雨在体育馆上体育课，不下雨则在操场上体育课”。用流程图来描述这一问题时，判断“是否下雨”的流程图符号是（ ） A）矩形 B）菱形 C）平行四边形 D）圆圈 22.在VB工程设计中，如果要使命令按钮Run上显示“运行”，则下列属性中应改变的属性是( ) A）Font B）Height C）Width D）Caption 23. 在VB中，关系表达式x/y=x\\y为真，则说明( ) A） x不能被y整除 B） x与y一定相等 C） x与y一定不相等 D） x能被y整除 24. “下雨在体育馆上体育课，不下雨则在操场上体育课”，用算法描述这一问题，合适的算法结构是( ) A） 顺序模式 B）选择模式 C）循环模式 D）树型模式 25. 在Visual Basic中，语句Dim x As String的作用是将变量x定义为（ ） A）字符串型 B）整数型 C）逻辑型 D）日期型 26. 在Visual Basic工程设计中，要在标签对象Start上显示文字“欢迎使用本系统!”， 则下列属性中应改变的属性是( ) A）Caption B）Width C）Text D）Height 27.在下面各关系中,当X取任意数值时都能成立的式子是（ ） A）Int(X)>= Abs(X) B）Int(X)=Abs(X) C）Int(X)<=Abs(X) D）Int(X)<>Abs(X) 28. 下列属于正确的Visual Basic表达式是( ) A）a+|b| B）3b-2a C）2?b D）b+5 29. 在VB中，若x、y均是正整数，关系表达式x Mod y=0为真时，则表示( ) A） x不能被y整除 B） x能被y整除 C） x一定等于y D） x、y均为0 30．设a=3,b=5，则以下表达式值为真的是( ) A) a>=b And b>10 B)(a>b)Or(b>0) C)(a<0)or(b<0) D)(-3+5>a)And(b>0) 31．在Visual Basic中，设x=3171，能得到其十位上数字“7”的正确表达式是( ) A） x\\10 Mod 100 B）x\\10 Mod 10 C）x\\100 Mod 10 D）x Mod 100 32. 在Visual Basic中，变量a中的数值是整数而且可能在-32768～32767范围之外，则变量a的数据类型应定义为( ) A）日期型 B）整数型 C）长整数型 D） 逻辑型 33.以下声明语句中正确的是( ) A）Const abs=123 B） Dim val as integer C）Const int1=123 D） Dim chr As single 34. 在Visual Basic代码窗口中，语句Student.Text=\宋知国\中的Text是（ ）

1

A）属性名 B）属性值 C）对象名 D）窗口名 35. 表达式 5 Mod 3+3\\5*2的值是( )

A) 0 B) 2 C)4 D) 6

36. 设x=4,y=8,z=7，表达式xz) Or z

37.设a=5，b=4，c=3，d=2,表达式3 > 2 * b Or a = c And b <> c Or c > d的值是( ) A)1 B)True C) False D)2

38. 在Visual Basic中，表示整数型的数据类型名是（ ） A）Date B）Integer C）String D）Boolean 39. 在Visual Basic中，已知x是正整数，关系表达式x Mod 2=1为真时，则表示（ ） A） x被2除的余数为0 B） x能被2整除 C）x是奇数 D）x是偶数 40. Visual Basic函数Fix(x)的作用是截掉数据的小数部分。已知a是实数，当关系表达式Fix(A）=a为真时，则表示a是（ ） A）负数 B）正数 C）整数 D）小数 41. 在如右图所示的Visual Basic窗体中，这些被放入窗体中的控件称之为（ ） A）类 B） 事件 C）属性 D）对象 42. 下列描述算法的流程图符号中属于判断框符号的是（ ） A） B） C） D）

43. 在Visual Basic中，求实数x的算术平方根的函数是（ ） A）Int(x) B）Sqr(x) C）Abs(x) D）Log(x)

44. .在VB代码窗口中，语句Book1.Text=\操作系统\中的Book1是（ ） A）属性名 B）属性值 C）窗口名 D）对象名 45. 在Visual Basic中，Hello.vbp文件属于（ ）

A）工程文件 B）窗体文件 C）代码文件 D）类文件 46.在Visual Basic中，如果要给变量i,j,k都赋值为1，则下列语句正确的是（ ） A）i=j=k=1 B）i,j,k=1 C）i=1,j=1,k=1 D）i=1:j=1:k=1 在Visual Basic中，正确表示\的立方加1\的表达式是（ ） A）a3+1 B）a^3+1 C）(a+1) 3 D）(a+1)^3 47.在Visual Basic中，若x是大于零的偶数，则下列关系表达式值一定为真的是（ ） A）x Mod 2 = 1 B）x\\2 = 0 C）x\\2 = x/2 D）Int(x/2) <> x/2

48. 在Visual Basic中，若要定义变量no用于存储汽车牌照号码，如\浙A?12345\，则正确的定义语句是（ ）

A）Dim no As Integer B）Dim no As String C）Dim no As Single D）Dim no As Boolean 49. 下列Visual Basic表达式正确的是（ ） A）v0+a*t B）a2+2bc C）2π*r D）1/2g*t^2

50. 在Visual Basic中，单击文本框Text2触发的事件处理过程名是( )

A) Text1_Click B) Text2_GotFocus C) Text2.Click D) Text2_Click 二、填空题

1.设A=2,B=3,C=4,D=5，写出下列逻辑表达式的值。 （1）A>B And C<= D Or 2*A>C ___________ （2）3>2*B Or A=C And B<>C Or C>D ____________ （3）Not A<=C Or 4*C=B ^ 2 And B<>A+C ________ 2.若A=20,B=80 ,C=70, D=30 ,则表达式

A +B >160 Or (B*C>200 And Not D>60)的值是__________

3.设A=2 , B= - 2 ,则表达式A / 2 + 1 > B + 5 Or B * (-2)=6的值是________ 4.设A=2,B= -4 ,则表达式3*A> 5 Or B + 8<0的值是__________

5.关系式X≤ -5或X≥5所对应的逻辑表达式是: ________________________ 6.关系式-5≤X≤5所应的逻辑表达式是: _____________________________

7.A的绝对值大于等于B同时不等于C的逻辑表达式是: ________________________

8.X是小于100的非负数,对应的逻辑表达式是: ________________________ 9.闰年的条件是:年号(Y)能被4整除,但不能被100整除;或者年号能被400整除.表示

该条件的逻辑表达式是: ________________________ 10.一元二次方程ax2+bx+c=0有实根的条件是a≠0,并且b2-4ac≥0,表示该条件的逻

辑表达式是: ________________________ 11.表示条件\变量X为能被5整除的偶数\的逻辑表达式是: _____________________ 12. 有如下Visual Basic程序段： 13.有如下Visual Basic程序段： a = 30 a=\ b = 20 b=\ a = b c=a+b 该程序段运行后，变量a的值为_____。 该程序段运行后，变量c的值是_____。 14.现在买股票的百姓越来越多，买股票是要收印花税的，如老王买了1000股股票，每股8.9元，那他除了要支付买股票的成交金额8900元钱之外，还要支付成交金额千分之一（0.001）的印花税即8900*0.001=8.9元。下面是计算印花税的程序（如图所示），设x为为每股的价格(单位：元)，y为要买的股票数量（单位为股，如1000股，y=1000），c为要支付的印花税金额（单位：元），则程序中划线处应填入的合适语句是：

Private Sub Command1_Click() Dim x As Double, y As Long x = Val(Text1.Text) y = Val(Text2.Text) c = ______________

Text3.Text =___________

2