说明: vb SSTab1.Tab = 0 Data1.RecordSource = "学生基本信息" Data1.Refresh Data1.Recordset.MoveLast Data1.Recordset.MoveFirst For i = 1 To Data1.Recordset.RecordCount Do While frmLogin.Num = Data1.Recordset.Fields("学号").Value Text1(0).Text = Data1.Recordset.Fiel
<u010740722> 上传 | 大小:25kb