在窗体上添加一个命令按钮Command1,然后编写如下代码: Private Sub Command1_Click() Dim city() As Variant city = Array("北京
举一反三
- 在窗体上添加一个命令按钮Command1,然后编写如下事件过程: Option Base 0 Private Sub Command1_Click() Dim city As Variant city = Array(" 北京 ", " 上海 ", " 天津 ", " 重庆 ") Print city(1) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。
- 在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程: Private Sub Command1_Click() Dim b,k For k=1 to 6 b=23+k Next k MsgBox b+k End 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程序运行后,单击命令按钮,则窗体上显示的内容是( )。
- 中国大学MOOC: 在窗体上添加一个命令按钮Command1,然后编写如下事件过程:Private Sub Command1_Click() Dim num As Integer num = 1 Do Until num > 6 Print num; num = num + 2.4 LoopEnd Sub程序运行后,单击命令按钮,则窗体上显示的内容是( )。
- 在窗体中添加一个命令按钮(名为Command1),然后编写如下代码: Public x as integer Private Sub Command1_Click( ) x=5 Call s1 Call s2 MsgBox x End Sub Private Sub s1( ) x=x+10 End Sub Private Sub s2( ) Dim x as integer x=x+10 End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果是______