川芎的功效为（）。

A.活血行气，利水消肿

B.活血行气，祛风止痛

C.活血化瘀，理气止痛

D.活血化瘀，祛风胜湿

E.活血行气，温经通络

在窗体上有一个命令按钮，然后编写如下事件过程。 Private Sub Command1_Click() Dim a(5)As StringFOR i=1 To 5 a(i)=Chr(Asc("A")+(i-1))NextFor Each b h a Print b；Next End Sub 程序运行后，单击命令按钮，输出结果是

A．ABCDE

B．1 2 3 4 5

C．abcde

D．出错信息