阅读程序：Private Sub Form_Click() x＝50 For i＝1 To 4 y＝InputBox("请输入一个整数") y＝Val(y) If y Mod 5＝0 Then a＝a＋y x＝y Else a＝a＋x End If Next i Print aEnd Sub程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为( )。
- A.100
- B.50
- C.120
- D.70
热度🔥325
参考答案：A
解析：
【解析】程序的作用是输入的数如果是5的倍数就累加，如果不是就与每次加50或与上次是5的倍数的那个数相累加。因此最终a的值是15＋15＋35＋35＝100。
【解析】程序的作用是输入的数如果是5的倍数就累加，如果不是就与每次加50或与上次是5的倍数的那个数相累加。因此最终a的值是15＋15＋35＋35＝100。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
在窗体上有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：
Private Sub Command1_Click()
Dim i，j，x
For i＝1 To 20 step 2
x＝0
For j＝i To 20 step 3
x＝x＋1
Next j
Next i
Text1.Value＝Str(x)
End Sub
打开窗体运行后，单击命令按钮，文本框中显示的结果是( )。
若有定义：
int w[3][5];
则以下不能正确表示该数组元素的表达式是
窗体上的三个命令按钮构成名称为Command1的控件数组。如图所示。 程序如下：Private Sub Command1_Click(Index As Integer) If Index＝1 Then Print"计算机等级考试" End If If Index＝2 Then Print Command1(2).Caption End IfEnd Sub运行程序，单击“命令按钮2”，则如下叙述中正确的是( )。
Modify Command命令建立的文件的默认扩展名是( )。
