更多“在窗体上添加一个命令按钮Command1,然后编写如下事件过…”相关的问题
第1题
在窗体上添加一个命令按钮Command1,然后编写如下事件过程: Private Sub Command1_Click() For n = 1 To 20 If n Mod 3 <> 0 Then m = m + n 3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是()。
点击查看答案
第2题
在窗体上添加一个命令按钮Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim num As Integer num = 1 Do Until num > 6 Print num; num = num + 2.4 Loop End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是()。
A.1 3.4 5.8
B.1 3 5
C.1 4 7
D.无数据输出
点击查看答案
第3题
在窗体上添加一个命令按钮,名称为Command1,编写如下事件过程: Private Sub Command1_Click() Dim arr arr = Array("武汉", "温州", "吉林", "哈尔滨", "北京") Print arr(2) End Sub 运行时,单击命令按钮后输出的结果是()。
点击查看答案
第4题
在窗体上添加一个命令按钮Command1,然后编写如下事件过程: Private Sub Command1_Click() For i = 1 To 4 x = 4 For j = 1 To 3 x = 3 For k = 1 To 2 x = x + 6 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,显示结果为()。
点击查看答案
第5题
在窗体上添加一个命令按钮Command1,编写如下事件过程,运行时单击按钮,显示结果为()。 Private Sub Command1_Click() For i = 1 To 4 For j = 4 To 8 Sum = Sum + 1 Next j Next i Print Sum End Sub
点击查看答案
第6题
在窗体上添加一个命令按钮Command1,编写如下事件过程,运行时单击命令按钮,如果在输入对话框中输入3,则在窗体上显示的内容是()。 Private Sub Command1_Click() Dim i%, j%, x%, n% x = 0 n = InputBox("Input") For i = 1 To n For j = 1 To i x = x + j Next j Next i Print x End Sub
点击查看答案
第7题
在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码: Private Sub Command1_Click() a=0:b=5:c=6 MsgBox? a=b+c End Sub 窗体打开运行后,如果单击命令按钮,则消息框的输出结果为()。
点击查看答案
第8题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() a = 75 If a>60 Then k = 1 ElseIf a>70 Then k = 2 ElseIf a>80 Then k = 3 ElseIf a>90 Then k = 4 End If MsgBox k End Sub 窗体打开运行后,单击命令按钮,则消息框的输出的结果是()。
点击查看答案