VB函数实际题目Private Sub Command1_ClickDim a%， sampFor a = 1 To 3s = s + facaNextPrint sEnd SubPrivate Function facn% As。用函数编程实现将其中最大数与最小数的位置对换后，再输出调整后的数组...