窗体上有一个命令按钮Command1和一个列表框List1，其中List1有0、1、2、3、4的内容，有下列程序：
Private Sub Command1_Click()
Dim i，s
For i=0 To List1．ListCount
s=s+List1．List(i)
Next i
Print s
End Sub
程序运行后，单击命令按钮，则窗体上显示的是

A．0

B．10

C．01234

D．程序出错

某人红细胞与B型血的血清凝集，而其血清与B型血的红细胞不凝集，其血型为（）

A．A型

B．B型

C．AB型

D． O型

E．Rh型