在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click（）Dim arr（1 To 100）As IntegerFor i=1 To 100arr（i）=Int（Rnd*1000）Next iMax=arr（1）Min=arr（1）For i=1 To 100If________ThenMax=arr（i）End IfIf________ThenMin=arr（i）End IfNext iPrint"Max="；Max，"Min="；M
题目
在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click（）
Dim arr（1 To 100）As Integer
For i=1 To 100
arr（i）=Int（Rnd*1000）
Next i
Max=arr（1）
Min=arr（1）
For i=1 To 100
If________Then
Max=arr（i）
End If
If________Then
Min=arr（i）
End If
Next i
Print"Max="；Max，"Min="；Min
End Sub
程序运行后，单击命令按钮，将产生100个1000以内的随机整数，放入数组arr中，然后查找并输出这100个数中的最大值Max和最小值Min，请填空。
相似考题
更多“在窗体上画1个命令按钮,其名称为Command1,然后编写如下事件过程: PrivateSubCommand1_Cl ”相关问题
-
第1题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click( ) a=12345 Print Format $(a，"000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是
A．123.45
B．12345.00
C．12345
D．00123.45
正确答案：B
解析：解题的关键是掌握对格式说明字符的理解。0表示一个数字位，0的个数决定了显示区段的长度，多余的位以0补齐；小数点与O结合使用，可以放在显示区段的任何位置，根据格式字符串的位置，小数部分多余的数字按四舍五入处理。由于本题中变量a为12345，并没有涉及小数，故可以直接在其后补两个0。 -
第2题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_ Click() Dim arr (10) For i = 1 To 10 arr (i) = i ^ 2 Next i Print arr(i - 2) End Sub程序运行后，单击命令按钮，在窗体上输出的是______。
A．49
B．64
C．81
D．100
正确答案：C
-
第3题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a=12345 Print Format$(a,"000,00") End Sub 程序运行后，单击命令按钮，窗体上显示的是( )。
A．123.45
B．12345.00
C．12345
D．00123.45
正确答案：B
-
第4题：
在窗体上画一个命令按钮，其名称为Command]，然后编写如下事件过程：
程序运行后，单击命令按钮，消息框输出的是（ ）A. 48
B. 72
C. 96
D. 128
正确答案：B
奉题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值，最后求两个数组元素值的积。浅们只需要注意这两个数组元素在循环中被赋了什么值，当i=3 j=3时，al(3，3)=3+3=6，a2(3。3)= al(3，3)+3+3=12．所以最后二者之积为72。
-
第5题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是
A． 123.45
B．12345.00
C．12345
D．00123.45
正确答案：B
解析：对于符号“0”，实际数字小于符号位数时，数字前后加0；大于时，若要显示数值表达式的整数部分位数多于格式字符串的位数，按实际数值显示。若小数部分的位数多于格式字符串的位数，按四舍五入显示。 -
第6题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click（）
a = 12345
Print Format$（a, "000.00"）
End Sub
程序运行后，单击命令按钮，窗体上显示的是（ ）。
A．123.45
B．12345.00
C．12345
D．00123.45
正确答案：B