中国大学MOOC: 在窗体上添加一个命令按钮Command1和一个文本框Text1,把文本框的Text属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() a = InputBox(Enter an Integer) b = InputBox(Enter an Integer) Text1.Text = b + aEnd Sub程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示的内容是( )。
举一反三
- 在窗体上添加一个命令按钮,编写事件过程: Private Sub Command1_Click() Dim a As Integer,b As Integer a=InputBox("Enter the First integer") b=InputBox("Enter the Second integer") Print b+a End Sub 程序运行后,单击命令按钮,先后在两个输入对话框中分别345和678,则输出结果是( )。
- 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a, b As Integer A: = InputBox("Enter the First integer") B: = InputBox("Enter the Second integer")Print b + aEnd Sub程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是( )。A. 579 B. 123 C: 456 D: 123456
- 在窗体上添加一个文本框Text1和一个命令按钮Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim i As Integer, n As Integer For i = 0 To 50 i = i + 3 n = n + 1 If i > 10 Then Exit For Next Text1.Text = Str(n) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是( )。
- 中国大学MOOC: 在窗体上添加一个命令按钮Command1和一个文本框Text1,并在命令按钮的Click事件过程中编写如下代码:Private Sub Command1_Click() A = 1.2 C = Len(Str$(A) + Space(10)) Text1.Text = CEnd Sub程序运行后,单击命令按钮,在文本框中显示( )。
- 中国大学MOOC: 在窗体上添加一个命令按钮Command1,然后编写如下事件过程:Private Sub Command1_Click() Dim a As Integer, s As Integer a = 8 s = 1 Do s = s + a a = a - 1 Loop While a <= 0 Print s; aEnd Sub程序运行后,单击命令按钮,则窗体上显示的内容是( )。