柠檬试题库
search
首页
计算机
公务员
驾照
关于
share
设有以下程序: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
热度🔥832
参考答案:A
解析:
【解析】程序的作用是输入的数如果是5的倍数就累加,如果不是就每次加50或与上次是5的倍数的那个数相累加。因此最终a的值是15+15+35+35=100。
复制题目向AI提问
content_copy
content_copy
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
下面不属于软件测试实施步骤的是
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。 程序代码如下:Dim color(3)As IntegerPrivate Sub Form_Load() Call fill(color())End SubPrivate Sub fill(c() As Integer) Form1.BackColor=RGB(c(1),c(2),c(3))End SubPrivate Sub HSRed_Change() color(1)=HSRed.Value Call fill(color())End SubPrivate Sub HSGreen_Change() color(2)=HSGreen.Value Call fill(color())End SubPrivate Sub HSBlue_Change() color(3)=HSBlue.Value Call fill(color())End Sub关于以上程序,如下叙述中错误的是( )。
基于Visual FoxPro基类生成一个表单对象的语句是
标签
二级VB程序设计
输入
50
程序
15