VB基本知识及选择、循环结构习题

一、VB基本知识和选择、循环结构练习问题一、基本概念问题(说明Visual Basic的合法直接常数，并表示各种类型。100.0001 e123d 123，4560100AK AK AAK AK AK AK78 M123 AAMK MMMMMK MMMMMMMMMMM 345.54#(2)以下数据哪个是变量，哪个是常数？ 常数的类型是什么？Name “name” False ff “11/16/99” cj“120” n #11/12/2004# 12.345(3)下列符号中，Visual Basic的有效变量名是哪一个？A123 a12_3 123_a a，123 a 123整数XYZ False Sin(x )变量名称sinx (4)下面的公式写成Visual Basic式(1) (2)。(三) (四)。(5) (6)。(5)导出以下公式的值(1)123 23 Mod 10 7 Asc(A )(2)Int(68.555 * 100 0.4)/100(3)#11/22/2004# - 10(4)ZXY 123 abc (6)设a=7、b=3、c=4，求出下式的值(1)a 3 * c (2)a 2/4(3)a/2 3 2 (4)a Mod 3 b 3/c 5(7)写出以下函数值(1) int (-3.14159 ) (2)传真(-3.14159 )(3) sqr (81 ) ) (4) len ( visual basic编程)(5) PS (ABS (99-100 )/2 ) (6) PS (7* 32 )(7)LCase(Hellow VB！ (8) PS ( hellow VB！ )，4，3 )(9)左( hellow VB！ )3) (10)Val(16个23个)(11 ) str (-459.55 ) (12 ) ucase ( visual basic )二、选择问题(1)能同时删除字符串开头和末尾的空格的函数是。A. Ltrim B. Rtrim C. Trim D. Mid(2)函数Int(Rnd(1) * 10 )在哪个范围内产生随机整数。a.(0，1 ) b.(0，9 ) c.(1，10 ) d.(1，9 )(3)数学式sin25写为Visual Basic式。a.sin 25 b.sin (25 ) c.sin (25 ) d.sin (25 * 3.14/180 )(4)式16/4-23*8/4mod52的值为。A. 14 B. 4 C. 20 D. 2(5)数学关系式表示为正确的VB式。a.3=x 10 b.x=3和x 10c.x=3或x 10 d.3=x和10如果(6)已知的A=”，则公式Val(Left(a，4) Mid(a，4，2 ) )的值为。A. B. C. 8 D. 6(7)式Len(123编程ABC )的值为。A. 10 B. 14 C. 20 D. 17(8)下一个正确的赋值语句是。a.xy=30b.y=3* r * RC.y=x30d.3y=x1(9)x、y、z三个变量赋予初始值1，因此正确的代入语句是。A. x=1: y=1: z=1 B. x=1，y=1，z=1 C. x=y=z=1 D. x，y，z=1(10 )当执行代入语句g=123 mid ( 3，2 )时，变量g的值为。A. “12334” B. 123 C. 12334 D. 157(11 )式Not(a b=c-d )为。a .逻辑式b .文字式c .算术式d .关系式(12 )如果x为正实数，则对x的第三位小数进行四舍五入的公式如下。a.0.01 * int (x0. 005 ) b.0.01 * int (100 * (x0. 005 ) )c.0.01 * int (100 * (x0. 05 ) ) d.0.01 * int (x0. 05 )(13 )以下哪个句子可以交换变量a、b的值？a=b : b=a.a=a : b=a-b : a=a-bc.a=c : c=b : b=ad.a=(ab )/2: b=(a-b )/2(14 )比较以下四个字符串，最小的是。a .“9977”b .“b 123”c .“基本”d .“数据”(15 )在下面的逻辑式中，其值为True的是。a .“b”“ABC”b .“that”“the”c.9“h”d .“a”“a”(16 )式a b=c为是。a .代入式b .文字式c .算术式d .关系式(17 )在下式中，不正当的是。a.a=bcb.abcc.abcd.a15theny=x21打印y结束次(8)执行以下程序时，输出结果。私有子表单_ click ()Dim sum As Integer求和%=19求和=2.23打印和%； sum结束次(9)执行以下程序后，输出结果如下：私有子表单_ click ()a=100PSs=s aa=a 1Loop Until a 100打印a结束次(10 )执行以下程序后，输出的结果如下：私有子表单_ click ()a=ABCD b=efgh c=LCase(a )d=UCase(b )打印光盘。结束次(11 )执行以下程序后，输出结果。私有子表单_ click ()x=2: y=4: z=6x=y: y=z: z=x打印x； y； z轴结束次(12 )执行以下程序后，输出的结果如下：私有子表单_点击()Dim count As Integer计数=0While count 20count=count 1文德打印计数结束次(13 )执行以下程序后，输出结果。私有子表单_ click ()a=*: b=$ For k=1 To 3x=Str(Len(a) k) b打印x；下一个结束次(14 )在执行以下程序时，输出的结果为：私有子表单_ c