카테고리 없음

MoveNext, MovePrevious

아이맥스 2011. 12. 6. 10:40

www.softwaredevelopmentdeveloper.com

옥션 아이폰/아이팟 집에서 즐기기 롯데마트 11번가 주민등록번호 도용사실이 있는지 확인해 보세요! CJmall 회원가입 도메인 NO.1-호스팅 NO.1 든든한 웹파트너 가비아 ! 건담 전문몰 건담샵 No.1 중고차 쇼핑몰! SK엔카

아래출처는 http://ad.web2r.net/r.php?c=shop 입니다.Sub ButtonPrevious_Click () Dim rs As Recordset Set rs = Form2.Form.Recordsetclone If rs.recordcount Then rs.MovePrevious If rs.bof Then rs.MoveNext Else Form2.Form.bookmark = rs.bookmark End If End If End Sub Sub ButtonNext_Click () Dim rs As Recordset Set rs = Form2.Form.Recordsetclone If rs.recordcount Then rs.MoveNext If rs.eof Then rs.MovePrevious Else Form2.Form.bookmark = rs.bookmark End If End If End Sub

크리에이티브 커먼즈 라이선스

Share |