老年男性，症见突然昏仆，不省人事，口眼歪斜，牙关紧闭，肢体强劲而不温，面白唇暗，喉中痰声，静卧不烦，苔白腻，脉沉滑。其治疗宜选用（）

A.局方至宝丹

B.菖蒲郁金汤

C.苏合香丸

D.牵正散加味

E.礞石滚痰丸

下列这个Sub过程的功能是：统计字符串中“a”的个数，请在空白处填上合适的代码，将程序补充完整。 Private Sub numCount() Dim num As Integer S$="software And hardware" num=Len(s$) For i=1 To numb$=______ Ifb$="a" Then x=x+1 Next i Print "x=";x End Sub