在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer Static s As Integer x=Val(Inpu

admin2019-03-14  30

问题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
    Private Sub Command1_Click()
    Dim x As Integer
    Static s As Integer
    x=Val(InputBox("请输入一个正整数"))
    If x<5 Then
    s=s*x
    Else
    s=s+x
    End If
    Print s
    End Sub
    运行程序,三次单击命令按钮,依次输入5、4、3,最后一次输出的结果是(    )。

选项 A、60
B、120
C、20
D、5

答案A

解析 本题中,首先使用static关键字,定义了一个静态局部变量s,初始值为0。然后通过InputB0x接收键盘输入一个值,使用Val转换函数将接收的字符型数据转换成数值型数据,赋值给x,接下来使用If~Else语句,判断条件“x<5”是否成立,若成立则执行语句“s=s+x”,否则执行语句“s=s+x”;使用statie定义的局部变量可以保留上次程序执行的结果。运行程序,三次单击命令按钮,依次输入5、4、3,各变量的值如下表所示。

  所以A选项正确。
转载请注明原文地址:https://kaotiyun.com/show/FdFp777K
0

最新回复(0)