设有命令按钮Command1的单击事件过程，代码如下：

Private Sub Command1_Click()

Dim a(30) As Integer

For i=1 To 30

a(i)=Int(Rnd*100)

Next

For Each arrItem In a

If arrItem Mod 7=0 Then Print arrItem

If arrItem＞90 Then Exit For

Next

End Sub

对于该事件过程，以下叙述中错误的是（）。

A．a数组中的数据是20个100以内的整数

B．语句For Each arrItem In a有语法错误

C．If arrItem Mod 7=0……语句的功能是输出数组中能够被7整除的数

D．If arrItem＞90……语句的作用是当数组元素的值大于90时退出For循环

涤痰汤主治（）

A.湿痰证

B.痰厥眩晕，咳喘痞胀

C.痰湿壅盛，内迷心窍所致中风，舌强不能言

D.实热老痰证

E.风痰上扰证