题目

用vb语言：求一组数的最大值最小值中位数和众数

提问时间：2021-03-29

答案

如果给定了一组数,假如为12 15 6 13 35 42 21 9 求最大值最小值如下：
private sub command1_（）
dim a(7) as integer
min=12
max=12
for i = 1 to 7
if a(i) 〉 max then
max = a(i)
elseif a(i)