책 내용 질문하기
엑세세155 4번
도서
2018 시나공 컴퓨터활용능력 1급 실기(엑셀, 액세스 2010 사용자용)
페이지
155
조회수
443
작성일
2019-01-24
작성자
탈퇴*원
첨부파일
Private Sub txt학번_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.ActiveConnection = CurrentProject.Connection
rs.Open " select * from 재학생 where 학번 = ' " & txt학번 & "'"
MsgBox rs!이름 & "/" & rs!학과 & "/" & rs!연락처
rs.Close
End Sub
아무리 몇번을 봐도 해설대로 똑같이 되있습니다.
3021 런타임 오류가 발생하였습니다.
BOF 또는 EOF가 참이거나, 현재 레코드를 삭제했습니다. 요청한 작업에 현재 레코드가 필요합니다.
이런 창이 뜨는데 뭐가 잘못된건지 모르겠습니다.
답변
2019-01-25 10:25:47
안녕하세요.
다른 문제에서도 동일한 현상이 발생된다면 오피스 프로그램상의 오류 일 수 있으므로
오피스 프로그램을 제거 한 후 다시 설치하여 사용해 보세요.
좋은 하루 되세요.
-
관리자2019-01-25 10:25:47
안녕하세요.
다른 문제에서도 동일한 현상이 발생된다면 오피스 프로그램상의 오류 일 수 있으므로
오피스 프로그램을 제거 한 후 다시 설치하여 사용해 보세요.
좋은 하루 되세요.