在窗体中添加一个命令按钮，名称为Command1；添加一个文本框，名称为Textl，然后编写如下程序：Private Sub Command1_Click( ) Dima(5)，b(5) Forj：1 T04 s(j)=3*j b(j)=a(j)*3 Next j Textl.Text=b(j\2)End Sub 程序运行后，单击命令按钮，在文本框中显示

A．25

B．18

C．36

D．35

煅后失去结晶水的药材是（）

A．石决明

B．明矾

C．自然铜

D．赭石

E．云母石