主题：[求助]

 判断一下 dra drb 是否有数据。

 If dra.Count > 0 Then

      dra(0)

 End If

 取 dra(0) drb(0) 之前，就要判断。

 无语了，学了这么久你什么都还不会。

Dim dra As List(Of DataRow) = da.Select("", "总分 desc")
If dra.Count > 0 Then
    dra(0)("名次") = 1
   
    For i As Integer = 1 To dra.Count - 1
       
        If dra(i)("总分") = dra(i-1)("总分") Then
           
            dra(i)("名次") = dra(i-1)("名次")
           
        Else
           
            dra(i)("名次") = i+1
           
        End If
       
    Next
End If