第3章 数据输入与输出习题

数据输入与输出习题

简单应用

说明：符号" "代表空格。

一、选择题：

1.下列语句

Print "80+90=";Print 80+90的输入结果是（）

A．80+90＝ 170 B. 170

C．80+90＝170 D. "80+90="

2.语句Print"ABC";Spc(4); "DEF"的输出结果是（）

A. ABCDEF

B. ABCDEF

C. ABC DEF

D. ABCDEF

3.语句Print Format$(25634, "###")的输出结果是（）

A．256 B. 25634

C．634 D. 340

4.Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是（）

A. -36

B. 1

C. -1

D. -72

5.以下语句的输出结果是( )

Print Format$( 32548.5, "000,000.00")

A. 32548.5

B. 32,548.5

C. 032,548.50

D. 32,548.50

6. 在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click( )

b=5

c=6

Print a=b+c

End Sub

程序运行后，单击命令按钮，其结果为（）

A. a=11

B. a=b+c

C. a=

D. False

7. 执行下列语句后，显示输入对话框，此时如果单击“确定”按钮，则变量S的内容是（）S=InputBox(“请输入字符串”,“字符串对话框”，“字符串”)

A．“请输入字符串” B. “字符串对话框”

C．“字符串” D. 空字符串

8.有下列语句X=inputBox(“输入数值”,”示例”,0)程序运行后，输入10按回车，下列说法错误的是（）

A. 变量X的值是数值10

B．在InputBox对话框标题栏中显示的是“示例”

C．0是默认值

D．变量X的值是字符串“10”

9.Private Sub Command1_Click( )

MsgBox Str(123+321)

End Sub

运行后，在信息框中显示的提示信息是（）

A．123+321 B. 字符串“444”

C．数值4444 D. 空白

10.Private Sub Command1_Click( )

a=InputBox(“Enter an integer”)

b=Text1.text

Text1.text=b+a

End Sub

程序运行后，在文本框中输入456,再单击命令按钮，在输入对话框中输入123,请问最后文本框中的内容是（）

A．579 B. 123 C. 456123 D. 456

二、填空题：

1.在默认情况下InputBox函数回返值的类型是______________。

2.语句Print Tab(20); "Visual Basic"的作用是________________________________。

3.语句Print"aa"&"bb";-5*6;Not 2<=3的结果是_________________。

4.下列语句执行的结果是________

S$="China"

S$="Beijing"

Print S$

5.a%=3.14156

Print a%

输入结果是_________。

综合应用

一、看程序写结果

1.阅读下列程序写出运行结果

x=5:y=10:z=15

Print x,y,z, "ABCDEF"

Print

Print x,y,z; "ABCDEF"; "GHIJK"

2. 在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click( )

a= InputBox("Enter the First Integer")

b= InputBox("Enter the Second Integer")

Print b+a

End Sub

程序运行后，单击命令按钮，先后在两个输入对话框中输入456和123,则输出结果是什么？

3. 在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click( )

Dim a ,b As Interger

a= InputBox("Enter the First Integer")

b= InputBox("Enter the Second Integer")

Print b+a

End Sub

程序运行后，单击命令按钮，先后在两个输入对话框中输入456和123,则输出结果是什么？

4. Private Sub Form_Click( )

a=32548.56

Print Format(Int((a*10+0.5))/10, "000,000.00")

End Sub

程序运行后，结果是什么？

5.阅读下列程序写出运行结果,详细标明空格的位置和个数。

Sub Form_Click( )

a=10:b=15:c=20:d=25

Print"123456789012345678901234567890"

Print a;Spc(5);b;Spc(7);c

Print c;Spc(3); "+";Spc(3);d;

Print Spc(3); "=";Spc(3);c+d

End Sub

二、设计题

1.编写程序：鸡兔同笼，已知鸡兔总头数为h（程序运行时由键盘输入给出），总脚数为f（程序运行时由键盘输入给出），求鸡兔各有多少只？

要求：单击“开始”按钮，弹出输入对话框，分别输入h和f的值，计算并显示出鸡、兔的数目，并在窗体上空30个字符输出“已知鸡、兔总头数为h,总脚数为f”（h,f是输入的具体值）建立控件如图3-1所示，最后结果如图3-2、3-3所示。