填空题:在窗体上画1个命令按钮,其名称为commandl,然后编写如下事件过程:Private Sub Command l_Cl

  • 题目分类:VB
  • 题目类型:填空题
  • 查看权限:VIP
题目内容:
在窗体上画1个命令按钮,其名称为commandl,然后编写如下事件过程:
Private Sub Command l_Click()
Dim arr(1 T0 100)As Integer
For i=1 T0 100
arr(i)=Int(Rnd*1 000)
Next i
Max=arr(1)
Min=arr(1)
For i=1 T0 100
If【1】Then
Max=arr(i)
End If ”
If【2】Then
Min=arr(i)
End If
Next i
Print “Max=”;Max,”Min=”;Min
End Sub
程序运行后,单击命令按钮,将产生100个1000以内的随机整数,放人数组arr中,然后查找并输出这100个数中的最大值Max和最小值Min,请填空。
参考答案:
答案解析:

设有命令按钮Command1的单击事件过程,代码如下:Private Sub Command1_Click()Dim a

设有命令按钮Command1的单击事件过程,代码如下:Private Sub Command1_Click()Dim a(30)As IntegerFor i=

查看答案

急性有机磷中毒病人病情危重时给予高流量吸氧的浓度是( )。

急性有机磷中毒病人病情危重时给予高流量吸氧的浓度是( )。A.3~4L/min B.4~5L/min C.5~6L/min D.6~7L/min E.6~8L/

查看答案

急性肾小球肾炎初起常见症状是( )。

急性肾小球肾炎初起常见症状是( )。A.水肿 B.少尿 C.尿沉渣 D.蛋白尿 E.血尿

查看答案

消化性溃疡合并穿孔常见于( )。

消化性溃疡合并穿孔常见于( )。A.胃溃疡 B.十二指肠溃疡 C.急性糜烂性胃炎 D.急性腐蚀性胃炎 E.慢性萎缩性胃炎

查看答案

根据下面的文字资料回答题connected by( 1 )or Hubs,which just move the bit

根据下面的文字资料回答题connected by( 1 )or Hubs,which just move the bits from one network t

查看答案