vb msgbox排名榜

Question

本帖最后由 bcrun 于 2012-05-27 16:22:30 编辑

Answer 1

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在哪？

Answer 2

 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心中，呵呵

Answer 3

你只有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]

Answer 4

这肯定不是lz自己写的程序.没有next就自己找嘛,你的程序你应该知道for的位置和next的位置千万别说这是个什么考试题,嘿嘿