某算法的部分流程图如图所示。执行这部分流程，则输出的sum的值是

A．2450

B．2550

C．5050

D．4900

删除字符串中的非字母字符，并查找出ASCII码值最大的字母。程序功能如下: 在文本框Text1中输入一个字符串，单击命令按钮Command1，在文本框Text2中显示删除非字母字符后的字符串，在文本框Text3中显示ASCII码值最大的字母，运行界面如图所示。

（1）程序中的Command1_Click()属于____________。（单选，填代码:

A．对象名/

B．事件名/

C．属性名/

D．事件处理过程名）

（2）实现上述功能的VB程序如下，请在划线处填入合适代码。
Private Sub Command1_Click()
Dim result As String, s As String, c As String, cmax as string
Dim i As Integer, j As Integer
s = Text1.Text
Text2.Text = ""
For i = 1 To Len(s)
①_________
If c >= "A" And c <= "Z" Or c >= "a" And c <= "z" Then
result =②______
End If
Next i
Text2.Text = result
j = 2
cmax = Mid(result, 1, 1)
Do While j <= Len(result)
If Mid(result, j, 1) > cmax Then cmax = Mid(result, j, 1)
③________
Loop
Text3.Text = cmax
End Sub

有如下Visual Basic程序：
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
Next i
End Sub
该程序计算了一个表达式的值，这个表达式是

A．1/2+2/3+3/4+4/5	B．1+1/2+2/3+3/4
C．1+1/2+2/3+3/4+4/5	D．1+1/2+1/3+1/4+1/5

编写VB程序，实现如下功能：在文本框Text1中输入一个十进制整数，单击命令按钮Command1,在标签Label2上显示转换成十六进制数的结果，运行效果如图所示。

（1）在设计程序界面时，要使按钮Command1上的文字显示为“转化成十六进制”，应修改按钮Command1的_____________________属性。
（2）为实现上述功能，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim y As Integer, r As Integer
Dim s As String, t As String
t = "0123456789ABCDEF"
s = ""
y = ①_________
Do While  y>0
r = y Mod 16
s = ②__________
y = ③_________
Loop
Label2.Caption = Text1.Text + "转化成十六进制数为：" + str(s)
End Sub

某算法的部分流程图如图所示，执行这部分流程，输出s的值为24，流程图中①处不可能为（ ）

A．s<=24？

B．s<24？

C．a<=11？

D．a<14？

有如下VB程序段：
a(1) = 1：a(2) =1：b(1) =1：b(2) = 2
For i = 3 To 5

a(i) = a(i-1) + a(i-2)

b(i) = b(i-1) + a(i)

Next i
执行该程序段后，数组元素b(5)的值为（  ）

A．4

B．5

C．8

D．12

某算法流程图如下图所示，执行该流程后，变量x，y的值分别是（   ）

A．0，" 3 1"	B．0，" 1 3"
C．3，31	D．3，1

有如下图所示的流程图，根据此流程图可知，最后s的值为（  ）

A．10

B．32

C．46

D．94

下图的运算结果为______________。

看下面流程图得结果，变量s和i的值分别是(   )。

A．5 和 3

B．6 和 3

C．8 和 6

D．6 和 6