金银花的现代应用是() A.皮肤真菌和神经性皮炎 B.脑缺血 C.妇科炎症及不孕症 发布时间:2017-08-24 04:32 │ 来源:www.tikuol.com 题型:单项选择题 B1型题 问题: 金银花的现代应用是()A.皮肤真菌和神经性皮炎B.脑缺血C.妇科炎症及不孕症D.急性扁桃体炎E.便秘
题型:单项选择题 B1型题 在窗体上画一个命令按钮Command1,然后编写如下程序: Private Sub Command1_Click()Dim arr() As IntegerReDim arr(3)For i=0 To 3 art(i)=iNext ix=InputBol("请输入一个数字:")If Val(x)>4 Then ReDim arr(4) art(4)=xEnd IfMe.Print (arr(4)-arr(3)) End Sub 程序运行后,单击命令按钮,在输入对话框中输入12,输出结果为 【10】 。 查看答案