VB练习3.doc

数据输入与输出习题说明：符号代表空格。一、选择题：1.下列语句Print 80+90=;Print 80+90的输入结果是（ A ）A80+90170 B. 170 C80+90170 D. 80+90=使用分号，两个print语句结果不换行80+90=2.语句PrintABC;Spc(4); DEF的输出结果是（ C ）A. ABCDEF B. ABCDEF C. ABCDEF D. ABCDEF3.Print Sgn(-62)+Abs(-62)+Int(-62)的输出结果是（ C ）A. -36 B. 1 C. -1 D. -72指数运算优先级高于取负运算Sgn(-36)+abs(-36)+int(-36)=-1+36+-36=-14. 在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click( ) b=5 c=6 Print a=b+c 等号在这里是判断是否相等End Sub程序运行后，单击命令按钮，其结果为（ D ）A. a=11 B. a=b+c C. a= D. False5. 执行下列语句后，显示输入对话框，此时如果单击“确定”按钮，则变量S的内容是（ C ）S=InputBox(“请输入字符串”,“字符串对话框”，“字符串”) A“请输入字符串” B. “字符串对话框” C“字符串” D. 空字符串6.有下列语句X=inputBox(“输入数值”,”示例”,0)程序运行后，输入10按回车，下列说法错误的是（ A ）A. 变量X的值是数值10 B在InputBox对话框标题栏中显示的是“示例”C0是默认值 D变量X的值是字符串“10”7.Private Sub Command1_Click( ) MsgBox Str(123+321)End Sub运行后，在信息框中显示的提示信息是（ B ）A123+321 B. 字符串“444” C数值4444 D. 空白8.Private Sub Command1_Click( ) a=InputBox(“Enter an integer”) a=”123” b=Text1.text b=”456” Text1.text=b+a =”456”+”123” End Sub程序运行后，在文本框中输入456,再单击命令按钮，在输入对话框中输入123,请问最后文本框中的内容是（ C ）A579 B. 123 C. 456123 D. 456二、填空题：1.在默认情况下InputBox函数回返值的类型是_string_。 2.语句Print Tab(20); Visual Basic的作用是_在第20列输出Visual Basic _。3.语句Printaa&bb;-5*6;Not 2=3的结果是aabb-30false_。4.下列语句执行的结果是_Beijing_S$=ChinaS$=BeijingPrint S$5.a%=3.14156 Print a% %为整型输入结果是_3_。综合应用一、看程序写结果1.阅读下列程序写出运行结果x=5:y=10:z=15Print x,y,z, ABCDEFPrintPrint x,y,z; ABCDEF; GHIJK 5 10 15 ABCDEF5 10 15ABCDEFGHIJK2. 在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click( ) a= InputBox(Enter the First Integer) b= InputBox(Enter the Second Integer) Print b+aEnd Sub一次方程垢，单击命令按钮，先后在两个输入对话框中输入456和123,则输出结果是什么？ 1234565.阅读下列程序写出运行结果,详细标明空格的位置和个数。 Sub Form_Click( )a=10:b=15:c=20:d=25Print123456789012345678901234567890Print a;Spc(5);b;Spc(7);cPrint c;Spc(3); +;Spc(3);d;Print Spc(3); =;Spc(3);c+d End Sub12345678901234567890123456789010152020+25=45二、设计题1、求三角形的面积：由inputbox函数分别输入三条边的长度，计算并输出该三角形的面积注：d表示三边和的一半，Mj表示三角形面积。窗体上两个按钮名称依次为C1和C2利用3边求面积公式为 d=(a+b+c)/2 Mj=sqr(d*(d-a)*(d-b)*(d-c)Dim a as integer,b as integer,c as integer,d as single,mj as singlePrivate sub c1_click() a=val(inputbox(“请输入第一条边”)b=val(inputbox(“请输入第二条边”)c=val(inputbox(“请输入第三条边”)end subprivate sub c2_click() d=(a+b+c)/2 Mj=sqr(d*(d-a)*(d-b)*(d-c) Form1.print “三角形面积：” & Mj2、求两个数的相加。在窗体上建立两个名称分别为C1和C2，标题分别为“输入”和“计算”的命令按钮，要求程序运行后，如果单击“输入”按钮，可通过输入对话框输入两个数(分别是64和96)，分别存入整形变量a，b中，如果单击“计算”按钮，则对a，b变量进行加法运算，并把计算结果在消息框中显示出来，同时在窗体输出a、b的值（输出格式如图所示）Dim a as integer,b as integer,sum as integerPrivat