在窗体中有一个标签Lbl和一个命令按钮Commandl，事件代码如下： Option Compare Database Dim a As String*10 Private Sub Commandl Click()a=“1234”b=Len(a)Me．Lbl.Caption=b End Sub 打开窗体后单击命令按钮，窗体中显示的内容是

A．4

B．5

C．10

D．40

鸡血藤的功效为：

A．行气活血，补血调经

B．活血止痛，舒筋活络

C．行血补血调经，舒筋活络

D．活血调经，祛风通络

E．行气活血，祛风止痛