试题 试卷
题型：单选题 题类：常考题 难易度：普通
浙江省“温州十五校联合体”2018-2019学年高二下学期信息技术期中考试试卷
Private Sub Text1_Change()
Dim a, i As Integer
a= Val(Text1.Text)
For i = 2 To 6 Step 2
If a<= 15 Then a = a + i
Next i
Text1.Text = Str(a)
End Sub
若在文本框Text1中输入2，执行该程序段，For语句的循环次数为（ ）
S=0：k=1
Do while k <=4
If 8/k >=3 Then s=s＋k
k=k＋1
Loop
该程序段运行后，变量s和k的值分别是（ ）
Private Sub Command1_Click()
Dim sum As Double, x As Double
sum=0
n=0
For i=1 To 5
x=n/i
n=n+1
sum=sum+x
该程序计算了一个表达式的值，这个表达式是（ ）
x = 100
If x < 0 Then
For i = 0 to 100 x = x + 1
Else
y = Sqr(x) End If
试题篮
