vb msgbox排名榜

--------------------编程问答-------------------- For i = 0 To 4
  If j > a(i) Then
  a(i) = j
  MsgBox ("第一名:" & a(0) & vbCrLf _
  & "第二名:" & a(1) & vbCrLf _
  & "第三名:" & a(2) & vbNewLine _
  & "第四名:" & a(3) & vbNewLine _
  & "第五名:" & a(4))
End If

next在哪？ --------------------编程问答--------------------



 For i = 0 To 4

    If j > a(i) Then

    a(i) = j

    MsgBox ("第一名:" & a(0) & vbCrLf _

    & "第二名:" & a(1) & vbCrLf _

    & "第三名:" & a(2) & vbNewLine _

    & "第四名:" & a(3) & vbNewLine _

    & "第五名:" & a(4))

    End If

  Next i

在LZ心中，呵呵。。。 --------------------编程问答--------------------

引用楼主的回复:

Private Sub mn_score_Click()
Dim a(5) As Integer
Dim i As Integer
Dim j As Integer
a(0) = 951
a(1) = 925
a(2) = 897
a(3) = 773
a(4) = 100
MsgBox ("第一名:" & a(0) & vbCrLf _
& "……

你只有5个元素，为什么要定义成a(5)呢？定义成a(4)刚好。
VB的数组要比C语言多1个元素，A(5)有6个元素：a(0),a(1),a(2),a(3),a(4),a(5)。
C语言中：int a[5]; //数组a有5个元素：a[0],a[1],a[2],a[3],a[4] --------------------编程问答-------------------- 这肯定不是lz自己写的程序.

没有next就自己找嘛,你的程序你应该知道for的位置和next的位置

千万别说这是个什么考试题,嘿嘿

补充：VB ,  基础类