测评会员优惠活动进行中 · 开通 VIP,有效期内测评不限次 VIP 优惠中 · 测评不限次 立即查看

A63800. 有如下VB程序段:Dim a(1 to 5) as Integer, i as Integer, c as Integer

单选题

题目描述

有如下VB程序段:

Dim a(1 to 5) as Integer, i as Integer, c as Integer
a(1) = 2 : a(2) = 1 : a(3) = 3 : a(4) = 4 : a(5) = 5
c = 0
For I = 3 to 5
If a(i - 2) + a(i - 1) = a(i) Then c = c + 1
Next i
Text1.Text = Str(c)

该程序运行后,文本框text1中显示的内容是(  )

选项(单选)