성적관리프로그램

등록일 1999.02.06 한글 (hwp) | 5페이지 | 무료

본문내용

Dim recordsu, addsu As Long
Dim currentrec As Long
Dim cnt, currec As String

Private Sub Form_Resize()
Form1.Caption = "데이타 콘트롤을 이용한 성적처리"
textlock True
Data1.Recordset.MoveLast
recordsu = Data1.Recordset.RecordCount
Data1.Recordset.MoveFirst
End Sub
Private Sub Data1_Validate(Action As Integer, Save As Integer)

      최근 구매한 회원 학교정보 보기
      1. 최근 2주간 다운받은 회원수와 학교정보이며
         구매한 본인의 구매정보도 함께 표시됩니다.
      2. 매시 정각마다 업데이트 됩니다. (02:00 ~ 21:00)
      3. 구매자의 학교정보가 없는 경우 기타로 표시됩니다.
      최근 본 자료더보기
      추천도서