vb第二章程序设计基础实验.doc
实验作业 程序设计基础2实验目的1、掌握VB的基本数据类型，变量、常量的定义格式。2、掌握运算符和表达式的表示方法。实验要求1、 选择题，填空题、运行结果题、转换题标明题号，答案写在实验报告上。2、 程序设计题中的第2题要求把事件代码写在实验报告上。3、 程序设计题单建一个文件夹，以学号和姓名命名，压缩后上交到ftp服务器上。实验内容一、选择题1.表达式25.28 Mod 6.99的值是 B 。 （A）1 （B）5 （C）4 （D）出错2.表达式5 2 Mod 25 2 2的值是 D . （A）1 （B）0 （C）6 （D）43.表达式( 7 3 + 1) * (18 5 - 1)的值是 A 。 （A）8.67 （B）7.8 （C）6 （D）6.674.要强制显示声明变量，可在窗体模块或标准模块的声明段中加入语句 B 。 （A）Option Base 0 （B）Option Explicit （C）Option Base 1 （D）OptionCompare5.表达式Int(-20.9)+Int(20.9+0.5)-Fix(-17.9)的值为_C_A.-17 B.16 C.17 D.186.如果a,b,c的值分别为3,2,-3,则下列表达式的值是_ Abs(b+c)+a*Int(Rnd+3)+Asc(Chr(65+a)A.10 B.68 C.69 D.787.设m=”morning”,下列_表达式的值是”mor”BA.Mid(m,5,3) B.Left(m,3) C.Right(m,4,3) D.Mid(m,3,1)8.如果x是一个正实数，对x的第三位小数四舍五入的表达式是_A_A.0.01*Int(100*x+0.5) B.0.01*Int(10*x+0.5) C.0.01*Int(x+0.5) D.0.01*Int(x+5)9.求一个三位正整数n的十位数的方法是_A_A.Int(n/10)- Int(n/100)*10 B. Int(n/10)- Int(n/100) C.n-Int(n/100)*10 D. Int(n-Int(n/100)*1010.返回删除字符串前导和尾随空格符后的字符串，用函数 A 。A、Trim B、Ltrim C、Rtrim D、mid 11Int( Rnd * 100 ) 表示的是 C 范围内的整数。（参看书p33）A、0，100 B、1，99 C、0，99 D、1，10012输入对话框InputBox的返回值的类型是 A 。（参看书p34）A、字符串 B、整数 C、浮点数 D、长整数13表达式4十56* 7/8 Mod9的值是_A_A.4 B.5 A.6 B.7 14以下语句的输出结果是_A_a $ =”Visual Basic Programming”b $ =”Quick”c $ =b$&UCase(Mid$(a $,7,6)&Right$(a$,11) A. Visual BASIC Programming B. Quick Basic Programming C. QUICK Basic Programming D. Quick BASIC Programming15设A=”,则表达式Val(Left(A,4)+Mid(A,4,2)的值是_B_A. B. C.8 D. 616要使下列式子成立，x应取_C_ Int(x+2)=16A.14<=x<15 B. 14<x<=15 C. 14<x<15 D. 14<=x<=1517在下列函数中，_B_函数的执行结果与其他三个不一样A.String(3,”5”) B. Str(555) C.Right(“5555”,3) D. Left(“55555”,3)18设变量A值位-2，则_D_函数的执行结果与其他三个不一样A.Val(“A”) B. Int(A) C. Fix(A) D. Abs(A)19下程序段的输出结果是_D_aSqr(3)：b=Sqr(2)c=a>bprint cA.-1 B.0 C.False D.True二、填空题1语句Print Not 10>15 And 8<5+2的输出结果为（.False ）。2 已知A=7.5,B=2,C= - 3.6，写出下列布尔表达式的值。 （1）A>B And C>A Or A<B And Not C>B_ False _ （2）A>B And C>A Or Not C>B And A<B_ False _ 3设 C= “A”，写出下列布尔表达式的值。 （1）C>= “0” And C <= “9” Or C >= “A” And C <= “Z”_True_ 4设A=2,B=3,C=4,D=5，写出下列布尔表达式的值。 （1）A>B And C<= D Or 2*A>C_ False_ （2）3>2*B Or A=C And B<>C Or C>D_ False_ （3）Not A<=C Or 4*C=B 2 And B<>A+C_ False_ 5若A=20,B=80,C=70,D=30，则表达式A+B>160 Or (B*C>200 And Not D>60)的值是 _True_ 6设A=2,B= - 2，则表达式A/2+1>B+5 Or B*( - 2)=6的值是_False_ 7设A=2,B= - 4，则表达式3*A>5 Or B+8<0的值是_True_ 8关系式X<= - 5或X>= 5所对应的布尔表达式是：_ X<= - 5 or X>= 5_ 9关系式-5<=X<=5所对应的布尔表达式是：_ X<100 AND X>0_ 10A的绝对值大于等于B同时A不等于C的布尔表达式是：_ ABS(A)>=B ANDABC(A)<>C _ 11X是小于100的非负数，对应的布尔表达式是：_ X<100 AND X>0_ 12len（”中医临床”）<>3的结果是_中医临_13如果x=13.11，y=33，fix(x-y)*int(-x)+sgn(x-45) _-1_；14表示条件“变量X为能被5整除的偶数”的布尔表达式是： _X mod 5 =0 15闰年的条件是：年号（Y）能被4整除，但不能被100整除；或者年号能被400整除。表示该条件的布尔表达式是：_x mod 4=0 and x mod 400=0 and mod 100<>016一元二次方程ax2+bx+c=0有实根的条件有a0，并且b*b-4ac>=0，表示该条件的布尔表达式是：_ ax2+bx+c=0 and a0 and b*b-4ac>=0三、运行结果题在立即窗口操作并检验结果是否与所想相同，最后给出结果。1. ABCDE " > " ABRA " 结果=false2.ch=”AABCDEFGH”print mid(right(ch,6),len(left(ch,4),2)结果：FG3.a=”Visual Basic Programming”b=”Quick”c=b&Ucase(mid(a,7,6)&right(a,12)变量c的值为：Quick BASIC Programming4.print chr(65)结果：A 5.print sgn(2)结果：16.s=”ABCDEFGHIJK”print left(s,4)print right(s,4)结果：ABCD HIGK四、转换题将下列数学算式写成在VB中对应的表达式1.5+(a+b)2 = 5 + (a+b)*(a+b)2.cos(x)(sin(x)+1) = cos(x)*(sin(x)+1)3.e2+2 = e*e +24.2a(7+b) = 2*a*(7+b)5.8e3·ln2 = 8*e3*(ln2)五、程序设计题1、字符串函数大小写转换使用。设计界面如图1.Text1command1Command3Command2Label1Text2图1.运行程序，在文本框1输入字符串：图2.单击大写按钮，运行结果如图3.单击小写按钮，运行结果如图4.单击长度按钮，运行结果如图5.图2. 图3图4. 图5 UCase、LCase、函数参看书p312、设计如下窗体，输入身份证号码，点击按钮显示出生日期。3.完成如下界面设计：当分别单击命令按钮“显示当前日期“或“显示当前时间”时，在标签框中显示内容见如下图。（提示：左侧为四个label控件）
