第四章历年试题汇编.doc

02年4月
7．以下语句的输出结果是（ ）。
Print Format $(32548.5,“000,000.00”)
　A）32548.5
　B）32,548.5
　C）032,548.50　
　D）32,548.50
5．在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
a = InputBox("请输入一个整数")
b = InputBox("请输入一个整数")
Print a + b
End Sub
程序运行后，单击命令按钮，在输入对话框中分别输入321和456，输出结果为 [5] 。
02年9月份
(8) 设有语句
x=InputBox(“输入数值”，“0”，“示例”)
程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是（　）。
A) 变量X的值是数值10 　　B) 在InputBox对话框标题栏中显示的是“示例”
C) 0是默认值 　　　　　　D) 变量X的值是字符串“10”
03年4月份
(8)执行如下语句：
 a＝inutBox("Today"，"TomorroW，"Yesterday",,,"Day before yesterday"，5)
 将显示一个输入对话框，在对话框的输入区中显示的信息是（　）。
　A)Today
　B)Tomorrow
　C)Yesterday
　D)Day before yesterday
03年9月份
（4）在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：
Private Sub Command1_Click()
S$ = InputBox("请输入一个字符串")
Text1.Text = S$
End Sub
Private Sub Text1_Change()
Label1.Caption = UCase(Mid(Text1.Text, 7))
End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串"VisualBasic"，则在标签中显示的内容是 〖8〗 。
04年4月份
(9) 在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
 Private Sub Command1_Click()
 a = 12345
Print Format$(a, "000.00")
End Sub
程序运行后，单击命令按钮，窗体上显示的是（　）。
A) 123.45
　　B) 12345.00
　　C) 12345
　　D)00123.45
(17) 在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1Label1和Command1，然后编写如下两个事件过程：（　）。
Private Sub Command1_Click()
 　　 strText = InputBox("请输入")
 　　 Text1.Text = strText
End Sub

Private Sub Text1_Change()
 　　 Label1.Caption = Right(Trim(Text1.Text), 3)
End Sub
A)空
B) abcdef
C) abc
D) def
04年9月份
(6) 以下关于MsgBox的叙述中，错误的是（　）。
A） MsgBox函数返回一个整数
B) 通过MsgBox函数可以设置信息框中图标和按钮的类型
C) MsgBox语句没有返回值
D) MsgBox函数的第一个参数是一个整数，该参数只能确定对话框中显示的按钮数量
(19) 执行如下两条语句，窗体上显示的是（　）。
a=9.8596
Print Format(a,"$00,00.00")
A) 0,009.86
B) $9.86
C) 9.86
D) $0,009.86
05年4月份
(17)在窗体上画一个文本框，然后编写如下事件过程：
　　Private Sub Form_Click()
　　x = InputBox("请输入一个整数")
　　Print x + Text1.Text
　　End Sub
　　程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容是：（　）。
　　A)123
　　B)456
　　C)579
　　D)123456
05年9月份
（17）在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：
Private Sub Command1_Click()
a = InputBox("Enter an integer")
b = InputBox("Enter an integer")
Text1.Text = b + a
End Sub
程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示的内容是（　）。
A）108　　B）18 　　　C）810 　　D）出错
06年4月份
(19)假定有如下的命令按钮command1事件过程:
Private sub command1_click()
X=inputbox(“输入:”,”输入整数”)
MsgBox ”输入的数据是:”,”输入数据:”+x
End sub
程序运行后,单击命令按钮,如果从键盘上输入整数10,则以下输入中错误的是:
A. x的值是数值10
B. 输入对话框的标题是”输入整数”
C. 信息框的标题是”输入数据:10”
D. 信息框中显示的是”输入的数据是:”
(6)print format (Int(1234.789*100+0.5)/100,”000.000”)