Question

VB中一个全局变量，开始赋值为0，为什么到后边自己

Answer 1

Private Sub Command1_Click()
    Dim a(10) As Integer
    Dim max As Integer
    Dim min As Integer
    Dim avg As Double
    Dim sum As Integer
    sum = 0
    Randomize
    For i = 1 To 10
        If i = 1 Then
            a(i) = Int(Rnd * 90 + 10)
            max = a(i)
            min = a(i)
            sum = sum + a(i)
        Else
            a(i) = Int(Rnd * 90 + 10)
            If a(i) > max Then max = a(i)
            If a(i) < min Then min = a(i)
            sum = sum + a(i)
        End If
    Next i
    Print "最大值是" & max
    Print "最小值是" & min
    Print "平均值是" & sum / 10
    
End Sub

Answer 2

大陆探险玩法