1. InputBox函数返回值的类型为 。 A) 数值 B) 字符串 C) 变体 D) 数值或字符串(视输入的数据而定) 2. 对用MsgBox显示的消息框,下面__D____是错的。 A) 可以有一个按钮 B) 可以有两个按钮 C) 可以有三个按钮 D) 可以有四个按钮 3. 语句:answer = MsgBox("String1",,"String2","String3",2)执行后,将显示一个信息框,此时如果单击“确定”按钮,则answer的值为 。 A) String1 B) String2 C) String3 D) 1 4. 执行下列语句后,显示输入对话框,此时如果单击“确定”按钮,则变量strInput的内容是 。 strInput=InputBox("请输入字符串","字符串对话框","字符串") A) "请输入字符串" B) "字符串对话框" C) "字符串" D) 空字符串 5. 设有语句:x = InputBox("输入数值","0","示例") 程序运行后,如果从键盘上输入数值10并按回车键,则下列叙述中正确的是__ ____。 A) 变量X的值是数值10 B) 在InputBox对话框标题栏中显示的是“示例” C) 0是默认值 D) 变量X的值是字符串"10"
InputBox函数返回值的类型为 ______。
A.数值
B.字符串
C.变体
D.数值或字符串(视输入的数据而定)
下面是程序是计算给定函数的值,自变量x,y的值用InputBox函数输入,函数如下:
程序不完整,请填空,将程序的补充完整 Option Explicit Dim x As Single Dim y As Single Dim z As Single Private Sub Command1_Click() x=Val(InputBox("x=") ) y=Val(InputBox("y=") ) Private Sub Command2_Click() If【 】Then z=x ^ 2 + y ^ 2 ElseIf【 】Then z=x ^ 2-2 * y^2 【 】 z=y ^ 2 - 3 * x ^ 2 End If Form1.Print "当x,y 的值为:"; x,y Form1.Print "f(x,y) 的值为:": z End sub
A.在inputbox对话框标题栏中显示的是“示例”
B.变量x的值是数值10
C.变量x的值是字符串“10”
D.0是默认值
A.在box对话框标题栏中显示的是“示例”
B.变量x的值是数值10
C.变量x的值是字符串“10”
D.0是默认值
有如下程序,运行该程序后从键盘接收1个有效的(≥0)数据。如果输入的数据无效,则要求重新输入,否则显示该数据的平方根。程序空白处应填写( )。
Dim s As Integer, i As Integer
Dim flag As Boolean, p As Integer
flag=True
Do While flag
s=val(InputBox("请输入:"))
If s<0 Then
MsgBox"输入无效!请重新输入。"
Else
MsgBox Sqr(s)
______
End If
Loop
A.flag=True B.flag=False C.True=flag D.False=flag