《vb第二章程序设计基础实验.doc》由会员分享，可在线阅读，更多相关《vb第二章程序设计基础实验.doc（6页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、实验作业 程序设计基础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
2、。 （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
3、”,下列_表达式的值是”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.返回删除字符
4、串前导和尾随空格符后的字符串，用函数 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 $,
5、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=x15 B. 14x=15 C. 14x15 D. 14=xbprint cA.-1 B.0 C.False D.True二、填空题1语句Print Not 1015
6、And 8B And CA Or AB_ False _ （2）AB And CA Or Not CB And A= “0” And C = “A” And C B And CC_ False_ （2）32*B Or A=C And BC Or CD_ False_ （3）Not A=C Or 4*C=B 2 And BA+C_ False_ 5若A=20,B=80,C=70,D=30，则表达式A+B160 Or (B*C200 And Not D60)的值是 _True_ 6设A=2,B= - 2，则表达式A/2+1B+5 Or B*( - 2)=6的值是_False_ 7设A=2,B= -
7、 4，则表达式3*A5 Or B+80的值是_True_ 8关系式X= 5所对应的布尔表达式是：_ X= 5_ 9关系式-5=X=5所对应的布尔表达式是：_ X0_ 10A的绝对值大于等于B同时A不等于C的布尔表达式是：_ ABS(A)=B ANDABC(A)C _ 11X是小于100的非负数，对应的布尔表达式是：_ X0_ 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整除，但不能
8、被100整除；或者年号能被400整除。表示该条件的布尔表达式是：_x mod 4=0 and x mod 400=0 and mod 100016一元二次方程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 Programmi
9、ng”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.8e3ln2 = 8*e3*(ln2)五、程序设计题1、字符串函数大小写转换使用。设计界面如图1.Text1command1Command3Command2Label1Text2图1.运行程序，在文本框1输入字符串：图2.单击大写按钮，运行结果如图3.单击小写按钮，运行结果如图4.单击长度按钮，运行结果如图5.图2. 图3图4. 图5 UCase、LCase、函数参看书p312、设计如下窗体，输入身份证号码，点击按钮显示出生日期。3.完成如下界面设计：当分别单击命令按钮“显示当前日期“或“显示当前时间”时，在标签框中显示内容见如下图。（提示：左侧为四个label控件）