3.txt

学生成绩管理系统

CountText.Text = CountText.Text & "班级:" & rs.Fields(0) & " " & "学号:" & rs.Fields(1) & _
            " " & "姓名:" & rs.Fields(2) & " " & "高数:" & rs.Fields(3) & _
            " " & "英语:" & rs.Fields(4) & " " & "物理:" & rs.Fields(5) & _
            " " & "计算机:" & rs.Fields(6) & " " & "C语言:" & rs.Fields(7) & " " & "总分:" & ScoreCount & " " & vbCrLf