试题 试卷
题型：单选题 题类：常考题 难易度：普通
广西壮族自治区普通高中2018年6月信息技术学业水平考试试卷
a=4
b=7
a=a+b
b=a+b
Private Sub Command1_Click( )
Dim s As Integer
Dim I As Integer
S=0
For i=1 To 10
s=s+i\7
Next i
Text1.text=str(s)
End sub
该程序段运行后，文本框Text1中显示{#blank#}1{#/blank#}
Private Sub Command1_Click()
Dim a(5) as Integer
Dim n as Integer, i as Integer
n = Val(Text1.Text)
i = 0
a(1) = 1
a(2) = 1
For i = 3 To n
a(i) = a(i-1) + a(i-2)
Label1.Caption = a(i)
End Sub
若在Text1中输入5，则点击按钮后的运行结果为（ ）
试题篮
