2. 计算机
  3. 设有如下事件过程： Private Sub Form_Click() Dim f1 As Integer, f2 As Integer, i As Integer Dim s As Integer f1 = 1: f2 = 1 s = f1

设有如下事件过程： Private Sub Form_Click() Dim f1 As Integer, f2 As Integer, i As Integer Dim s As Integer f1 = 1: f2 = 1 s = f1

admin2018-05-08  36
问题 设有如下事件过程：
Private Sub Form_Click()
  Dim f1 As Integer, f2 As Integer, i As Integer
  Dim s As Integer
  f1 = 1: f2 = 1
  s = f1 + f2
  For i = 1 To 3
    f1 = f1 + f2
    f2 = f2 + f1
    s = s + f1 + f2
  Next i
  Print s
End Sub
运行程序，单击窗体，则输出结果为
选项 A、2
B、20
C、54
D、52
答案C
解析 程序开始执行时，f1=1，f2=1，s=f1+f2=2。For循环变量i的取值从1到3，当i=1时，f1=f1+f2=2，f2=f2+f1=1+2=3，s=s+f1+f2=2+2+3=7；当i=2时，f1=f1+f2=2+3=5，f2=f2+f1=3+5=8，s=s+f1+f2=7+5+8=20；当i=3时，f1=f1+f2=5+8=13，f2=f2+f1=8+13=21，s=s+f1+f2=20+13+21=54；故本题正确答案为C。
转载请注明原文地址:https://www.kaotiyun.com/show/LeGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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