单选题
在窗体上画一个名称为Co mmand1的命令按钮，然后编写如下事件过程：
在窗体上画一个名称为Co mmand1的命令按钮，然后编写如下事件过程：
Private Sub Co mmand1＿Click（）
Di ma As Integer ，s As Integer
a＝8
s ＝1
Do
s ＝s ＋a
a＝a－1
Loop While a ＜＝0
Print s ；a
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是（ ）。
发布于 2022-05-11 09:59:05
登录后免费查看答案
关注者
0
被浏览
14
1 个回答
推荐阅读
-
在窗体上面1个名称为Co mmand1的命令按钮，然后编写下列事件过程Option Base 1Private Sub Co mmand1＿Click（）Di ma（5，5）As IntegerFor i ＝1To 5 For j＝1To 5a（i ，j）＝（i ＋j ）＊5＼10Next jNext is ＝0For i ＝1To 5s ＝s ＋a（i ，i）Next iPrint sEnd Sub程序运行后，单击命令按钮，输出结果是（ ）。
2022-05-11 关注 0 浏览15 1答案
-
窗体上有一个名称为Co mmand1的命令按钮，其事件过程如下：Private Sub Co mmand1＿Click（）Di mi As Integer ，j As Integer ，k As IntegerDi ms As Doubles ＝0：i ＝1：j＝0：k ＝－1Do While i ＜6s ＝s ＋k＊（j／i）i ＝i ＋1j＝j＋1k ＝－kLoopPrint sEnd Sub以上程序所计算的表达式是（ ）。
2022-05-11 关注 0 浏览15 1答案
-
在窗体上画一个命令按钮，其名称为Co mmand1，然后编写下列代码：Option Base 1Private Sub Co mmand1＿Click（）Di maa＝Array（1，2，3，4）j＝1For i ＝4To 1Step －1s ＝s ＋a（i）＊jj＝j＊10Next iPrint SEnd Sub程序运行后，单击命令按钮，其输出结果是（ ）。
2022-05-11 关注 0 浏览17 1答案
-
在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：Private Function f(m As Integer)If m Mod 2 = 0 Thenf = mElsef = 1End IfEnd FunctionPrivate Sub Command1_Click()Dim i As Integers = 0For i = 1 To 5s = s + f(i)NextPrint sEnd Sub程序运行后，单击命令按钮，在窗体上显示的是
2022-05-11 关注 0 浏览17 1答案
-
在窗体上画一个名为Co mmand1的命令按钮，然后编写以下程序：Private Sub Co mmand1＿Click（）Di m M（10）As IntegerFor k ＝l To 10M（k）＝12－kNextkx＝8Print M（2＋M（x））End Sub运行程序，单击命令按钮，在窗体上显示的是（ ）。
2022-05-11 关注 0 浏览19 1答案
-
在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：Private Function fun(ByVal m As Integer)If m Mod 2 = 0 Thenfun = 2Elsefun = 1End IfEnd FunctionPrivate Sub Command1_Click()Dim i As Integer, s As Integers = 0For i = 1 To 5s = s + fun(i)NextPrint sEnd Sub程序运行后，单击命令按钮，在窗体上显示的是（ ）。
2022-05-11 关注 0 浏览9 1答案
-
在窗体上画一个名称为Co mmand1的命令按钮，然后编写如下程序：Public Enumsa＝4b ＝3End EnumPrivate Sub Co mmand1＿Click（）Di mx As Integerx＝aIf x＞＝3ThenMsgBox ＂Pass ！＂End Sub运行程序，其结果是（ ）。
2022-05-11 关注 0 浏览8 1答案
-
在窗体上画一个名为Co mmand1的命令按钮，然后编写如下代码：Option Base 1Private Sub Co mmand1＿Click（）Di maa＝Array（1，2，3，4）j＝1For i ＝4To 1Step －1s ＝s ＋a（i）＊jj＝j＊10NextiPrint SEnd Sub运行上面的程序，其输出结果是（ ）。
2022-05-11 关注 0 浏览9 1答案
-
设有如下通用过程：Public Function f（x As Integer）Di my As Integerx＝20y ＝2f ＝x＊yEnd Function在窗体上画一个名称为Co mmand1的命令按钮，然后编写如下事件过程：Private Sub Co mmand1＿Click（）Static x As Integerx＝10y ＝5y ＝f（x）Print x；yEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
2022-05-11 关注 0 浏览11 1答案
-
在窗体上画一个名称为Co mmand1的命令按钮，然后编写下列事件过程：Private Sub Co mmand1＿Click（）c ＝1234c1＝Tri m（Str（c））For i ＝1To 4Print NextEnd Sub程序运行后，单击命令按钮，要求在窗体上显示下列内容：1121231234则在横线处应填入的内容为（ ）。
2022-05-11 关注 0 浏览9 1答案
