2. 计算机
  3. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer Static s As Integer x=Val(InputBox("请输入一个正整数="

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer Static s As Integer x=Val(InputBox("请输入一个正整数="

admin2016-06-22  50
问题 在窗体上画一个名称为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
解析 本题中，首先使用Statie关键字，定义了一个静态局部变量s，初始值为0。然后通过InputBox接收键盘输入一个值，使用Val转换函数将接收的字符型数据转换成数值型数据，赋值给x，接下来使用If～Else语句，判断条件“x＜5”是否成立，若成立则执行语句“s=s*x”，否则执行语句“s=s+x”；使用Static定义的局部变量可以保留上次程序执行的结果。运行程序，三次单击命令按钮，依次输入5、4、3，各变量的值如下表所示。

所以A选项正确。
转载请注明原文地址:https://kaotiyun.com/show/00Lp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)