摘要：
Dim cj(8, 2) As SinglePrivate Sub Form_Click() Dim i As Integer, k As Integer Dim pro As String For i = 1 To 8 pro = " 请输入第" + Str(i) + "号运动员的成绩:" cj(i, 1) = InputBox(pro) cj(i, 2) = i Next i Call sor... 阅读全文
posted @ 2005-06-13 20:41 梦想的边缘 阅读(552) 评论(0) 推荐(0) 编辑