vb:输入10个整数求平均值,并求出大于、等于、小于平均值的数的个数（使用选择结构、循环结构、数组）.

Dim a(1 To 10) As Integer '定义10个数组Dim aa(1 To 9) As Integer '定义9个空格数组Dim n As Integer '定义空格数Dim s As Integer '数组和Form1.Cls '清除prints = 0n = 0For i = 1 To Len(Text1) '从text1第1位...