假定有如下的命令按扭(名称为Command1)事件过程:Private Sub Command1_Click()x=InputBox(“输入:”,“输入整数”)MsgBox“输入的数据是:”,,“输入数据:”+xEnd Sub程序运行后,单击命名按扭,所果从键盘上输入整数10,则以下叙述中错误的是()。
A: x的值是数值10
B: 输入对话框的标题是“输入整数”
C: 信息框的标题是“输入数据:10”
D: 信息框中显示的“输入的数据是:”
A: x的值是数值10
B: 输入对话框的标题是“输入整数”
C: 信息框的标题是“输入数据:10”
D: 信息框中显示的“输入的数据是:”
举一反三
- 在窗体上有一命令按钮Command1,其Click事件代码如下: Private Sub Command1_Click() Dim a%, b%, i%, n% For i = 1 To 10 n = InputBox("请输入一个整数", "输入数据框", 2) If n Mod 2 = 0 Then a = a + 1 Else b = b + 1 End If Next i MsgBox ("运行结果a=" & str(a) & ", b=" & str(b)) End Sub
- 以下叙述中,错误的是________。 A: 可以用MsgBox函数输出一条信息 B: MsgBox函数的返回值为一整数 C: 有语句:x = InputBox("输入:", "输入整数"),则该语句打开的对话框的标题是"输入整数" D: InputBox函数的返回值类型由用户在输入对话框中输入数据的类型决定
- 阅读程序在画线处填空。程序功能单击窗体,在输入对话框中分别输入三个整数,程序将输出三个数中的中间那个整数, Option Base 1 Private Sub Form_Click() Print "输入的数据是:"; For i=1 To 3 a(i)=InputBox("输入数据") Print a(i); Next Print If a(1)a(3) Then m=a(2) ElseIf a(1)>a(3) Then m=__ _ _____ Else m=__ ____ __ End If Print "中间数是:";m End Sub
- 设有语句:x=InputBox("请输入数值", "1", "输入"),程序运行后,如从键盘输入10并按回车键,则下述正确的是______。 A: 变量x的值是数值10 B: 在InputBox对话框标题栏中显示的是“输入” C: 变量x的值是字符串“10” D: 1是默认值
- 下面程序段是一个SelectCase选择结构。当num的值为1,3,5,7,9时,显示“输入的整数是小于10的奇数”。当num的值为10~20时,显示“输入的整数在10~20之间”。当num的值为负数时,显示“输入的整数是负数”。否则显示“输入的数据出界”。PrivateForm_Load()numAsIntegernum=InputBox("请输入整数num的值")SelectCasenumCase[1]Print"输入的整数是小于10的奇数"Case[2]Print"输入的整数在10~20之间"Case[3]Print"输入的整负数"CaseElsePrint"输入的整数出界"EndSelectEndSub