关于阴茎异常勃起的治疗，叙述正确的有（）

A.高流量型阴茎异常勃起：穿刺抽血、药物冲洗

B.高流量型阴茎异常勃起：血管栓塞

C.低流量型阴茎异常勃起：血管栓塞

D.低流量型阴茎异常勃起：穿刺抽血、药物冲洗

E.低流量型阴茎异常勃起：多数与外伤有关

窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Label1、 Caption属性为“Sum”的标签，一个名称为Command1、标题为“计算”的命令按钮。程序运行后，将把1～100之间能够被7整除的数添加到列表框中。如果单击“计算”按钮，则对listl中的数进行累加求和，并在文本框中显示计算结果，如图所示。以下是实现上述功能的程序，请填空。

Private Sub Form_Load() For i = 1 To 100 If i Mod 7 = 0 Then______ End If Next End Sub Private Sub Command1 Click() Sum=0 For i = 0 To ______ Sum = Sum+ ______ Next Text1：Text = Sum End Sub