- 二一组卷

题型：单选题题类：常考题难易度：普通

浙江省杭州地区重点中学2018-2019学年高二下学期信息技术期中考试试卷

有如下程序段：

For i = 1 To Len(Text1.Text)

c = Mid(Text1.Text, i, 1)

If c >= "0" And c <= "9" Then c = Chr(Asc(c) + 1)

If c >= "A" And c <= "Z" Then c = Chr(Asc(c) + 32)

s =s + c

Next i

若文本框Text1的内容为“Number 2468！”执行程序后，变量s的值为（）

A、NUMBER 3579！ B、NUMBER 2468！ C、number 3579！ D、number 2468！

举一反三

Dim i As Integer, s As Integer

s = 0

For i = 1 To 20

If i Mod 3 = 2 And i Mod 5 = 3 Then s = s + i

Next i

Label1.Caption = str(s)

执行以上程序后，标签Label1中显示的内容为（）

If a>b Then

max=a

Else

max=b

n = 6

d(1) = 23: d(2) = 31: d(3) = 19: d(4) = 33: d(5) =58: d(6) = 28

k = Abs(d(2) - d(1))

For i = 3 To n

If Abs(d(i) - d(i - 1)) > k Then k = Abs(d(i) - d(i - 1))

Next i

Text1.Text = Str(k)

上述程序段执行后，文本框Text1显示的内容是（）

相关试卷