试题 试卷
题型：解答题 题类：常考题 难易度：普通
内蒙古巴彦淖尔市临河三中计算机班2018-2019学年高二上学期信息技术期中考试试卷VB
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 x As Integer, m As Integer
m = 3
For x = 1 To 5
If m > 3 Then m = m + 2 Else m = m - 1
Next x
Text1.Text = Str(m)
End Sub
DIM A(6) AS INTEGER
FOR I= 1 TO 6
A(I)= I
NEXT I
PRINT A(I)
试题篮
