数组的使用 随机产生10个两位整数,找出其最大值、最小值和平均值,如图所示。 设计步骤如下 (1)建立应用程序用户界面与设置对象属性。 (2)编写代码。 随机整数的生成由窗体的Load事件代码完成 Private Sub Form Load Dim p As string Form1 Randomize 10个随机整数: For i=1 To 10 50 55,48,44,14 5,19,39,62 a()=Int(Rnd*90)+10 p=p&str(a(1)&"," 最大值B6 重置 最小值卩14 Labell Caption= LTrim( Left(p,Len(p)-1)平均值2 关闭 End Sub 求最大值、最小值和平均值数组的使用 随机产生10个两位整数，找出其最大值、最小值和平均值，如图所示。 设计步骤如下： (1) 建立应用程序用户界面与设置对象属性。 (2) 编写代码。 随机整数的生成由窗体的Load事件代码完成： Private Sub Form_Load() Dim p As String Randomize p = "" For i = 1 To 10 a(i) = Int(Rnd * 90) + 10 p = p & Str(a(i)) & "," Next Label1.Caption = LTrim(Left(p, Len(p) – 1)) End Sub 求最大值、最小值和平均值