试题 试卷
题型：单选题 题类：常考题 难易度：普通
浙江省高中信息技术 VB基本语句同步练习
Dim f1 as long, f2 as long, f as long
n=val(Text1.Text)
f1=1
f2=1
For k=3 to n
Next k
Label1.Caption=“斐波那契数列第”+str(n)+“项的值为”+str(f)
方框中的代码由以下三部分组成：
①f2=f ②f1=f2 ③f=f1+f2
代码顺序正确的选项是（ ）
Dim s As String, i As Integer, n As Integer
Dim ch As String, ans As Integer
s= Text1.Text
n Len(s): ans=0
For i=1 To n
ch =Mid (s, i, 1)
ans =ans *2+ Val(ch)
Next i
Text2 Text ans
若程序运行后Tex2中显示的是“38”，则Text中输入的是（ ）
Dim a (1 To 6) As Integer
Randomize
a(1) = Int (Rnd*2) + 1
For i = 2 To 6
a(j) = Int (Rnd*i) *2 + 1
If a(i) < a(i-1) Then
a(i) = a(i) + a(i-1)
End If
执行该程序段后，数组元素a(1)到a(6)的值可能是（ ）
试题篮
