治疗痰热内闭心包证的最佳方剂是

A．安宫牛黄丸

B．至宝丹

C．紫雪

D．羚角钩藤汤

设有如下窗体单击事件过程：
Private Sub Form_Click()
a=1
For i=1 To 3
Select Case i
Case 1,3
a=a+l
Case 2,4
a=a+2
End Select
Next i
MsgBox a
End Sub
打开窗体运行后，单击窗体，则消息框的输出的结果是( )。

A．3

B．4

C．5

D．6