Private a(9) As Integer
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim b, c, d As Integer
        TextBox1.Text = ""
        For b = 0 To 9
            a(b) = Int(90 * Rnd() + 10)
            TextBox1.Text = TextBox1.Text + CStr(a(b)) + ","
        Next b
        c = 1 : d = 0 : b = 0
        While c <= 10
            d += a(b)
            b += 1
            c += 1
        End While
        d = d / 10
        TextBox2.Text = CStr(d)
        If a(b) > d Then
            TextBox3.Text = CStr(a(b))
        End If
        TextBox3.Text = TextBox3.Text + CStr(a(b))
    End Sub
End Class
这个程序的问题出在哪啊？
调试的时候没问题
但是得不出结果……