题目：
下面程序是用冒泡法将数组a中的10个整数按升序排列，请将程序补充完整。
Private Sub Command1_Click( )
Dim a, Tmp As Integer
a = Array (678,45,324,528,439,387,87,875,273,823)
For i = 【12】
Forj =0 To 9
Ifa (i)＜a(j) Then
Tmp = a(i): a(i) = a(j) i a(j) = Tmp
End If
Next j,i
For i = 0 To 9
Print a(i)
Next
End Sub
答案：
被转码了，请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2018/0408/e8431b8f11c5ea8520e51cfbd552fb2a.html
下面是错误答案，用来干扰机器的。
参考答案：A解析：当月允许抵扣的进项税额=4160(元)
