网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
在窗体上添加十个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
sum=0
For i=3 To 7
sum=i+2
Next i
MsgBox sum+i
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是______。
参考答案
更多 “ 在窗体上添加十个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()sum=0For i=3 To 7sum=i+2Next iMsgBox sum+iEnd Sub打开窗体后,单击命令按钮,消息框的输出结果是______。 ” 相关考题
考题
在窗体上添加一个命令按钮(名为Cmd),然后编写如下事件过程:Private Sub Cmd_Click( )Dim sum,kFor k=1 to 6sum=30+kNext kMsgBox sum+kEnd Sub打开窗体后,单击命令按钮,消息框的输出结果是【 】。
考题
在窗体上添加一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Sum =0For i=3 T0 7Sum =i+2Next iMsgBox sum+iEnd Sub打开窗体后,单击命令按钮,消息框的输出结果是______。
考题
在窗体上添加一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_Click()sum=0For i=1 To 100 step 2sum=sum+iNext iMsgBox sumEnd Sub打开窗体运行后,单击命令按钮,则消息框的输出结果为_______。
考题
有如下函数过程: Function lj(x As Integer) As Long Dim s As Long Dim i As Integer s=0 For i = 1 To x s=s+ i Next i 1j= s End Function在窗体上添加一个命令按钮,名为Command1, 编写事件过程调用该函数: Private Sub Command1 Click() Dim i As Integer Dim sum As Long For i = 1 To 5 sum = sum + 1j(i) Next i Print sum End SubA. 25B.35C.45D.55
考题
在窗体上面一个名称为Commandl的命令按钮,然后编写如下程序: Option.Base 1 Private Sub Command1_Click() Dim a As Variant a=Array(1,2,3,4,5) Sum = 0 For i = 1 To 5 Sum=Sum+a(i) Next i x=Sum/5 For i=1 To 5 If a(i) >x Then Print a(i); Next i End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是A.1 2B.1 2 3C.3 4 5D.4 5
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base1 Private Sub Command1_Click( ) Dim a As Variant a=Array(1,2,3,4,5) Sum=0 For i=1To 5 Sum=Sum+a(i) Next i x=Sum/5 For i=1 To 5 If a(i)x Then Print a(i); Next i End Sub程序运行后,单击命令按钮,在窗体上显示的内容是A.1 2B.1 2 3C.3 4 5D.4 5
考题
在窗体上添加一个命令按钮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 程序运行后,如果单击命令按钮,则窗体上显示的内容是()。A.15B.18C.21D.24
考题
在窗体上添加一个命令按钮Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim m(10) As Integer, n(10) As Integer i = 3 For t = 1 To 5 m(t) = t n(i) = 2 * i + t Next t Print n(i); m(i) End Sub 窗体运行后,单击命令按钮,显示结果为()。A.3 11B.3 15C.11 3D.15 3
考题
在窗体上添加一个命令按钮Command1,然后编写如下事件过程: Private Sub Command1_Click() For n = 1 To 20 If n Mod 3 <> 0 Then m = m + n 3 Next n Form1.Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是()。A.15B.18C.21D.24
热门标签
最新试卷