Question

VB求助，求高手帮忙解答，解答部分已经注明。

Dim a As Single '变量a，还是数组变量a(10) （解答）
Dim v As String
Private Sub Form_Load()
For i = 1 To 10 '循环10次，输入10次数据 （解答）
v = InputBox("输入数据") '通过inputbox输入对话框，输入数据，存放在V中 （解答）
If v = "" Then Exit Sub
If IsNumeric(v) Then '对V进行判断 判断是否V是数字 （解答）
a(i) = v '每次输入的数据，分别存放在a(1)、a(2)、、、a(10)中 （解答）
Else
MsgBox ("请输入正确内容")
End If
Next i
End Sub
Private Sub Command2_Click()
For i = 1 To 10
For j = i To 10
If a(i) > a(j) Then 'a(i)和后面的元素进行比较，如果a(i)大于后面的元素 （解答）
t = a(i): a(j) = a(i): a(j) = t '则交换a(i)和a(j)的值 （解答）
End If
Next j
Next i
For i = 1 To 10
Picture1.Print a '数组元素按从小到大顺序排序之后，输出 （解答）
Next i
End Sub

Private Sub Picture1_Click()

End Sub

Answer 1

我就按顺序解答吧：
1、这里是变量a，不是数组。但根据后面的程序来看，这里应该是数组定义，应该是a（10）括号里的数大于10即可。
2、没错，是循环10次，输入10次
3、对啊，没错。输入的内容存入v中
4、这个IsNumeric函数就是判断是否为数字的
5、是的，但只有当v为数字时才会存入a（）中
6、这里不仅仅是跟后面的比，而是和所有其他成员对比，这是最简单的排序法
7、没错，交换值。
8、排序后，数组中的数从小到大排列，依次输出。
不知道你是否是要这样的回答？只能猜测你的想法了。

Answer 2

同学，我不大明白你的问题。可以问一下，要解答什么问吗？

Answer 3

我也没看明白需要解答什么