컴퓨터활용능력 1급 액세스 최종 정리

1. 입력 마스크

<입력마스크> ; <서식 문자의 저장여부> ; <입력 자리 표시 문자>

 

 

'형식'은 실제 저장되지 않고 출력 될 때만 적용되는 형식

 

2. 출력기능

combobox, listbox 컨트롤을 조건으로 사용할 때 바운드열 확인

 

3. 조회
 

숫자 데이터

Me.Filter = "판매량 >=" & txt판매량

Me.Recordsource = "Select * from 제품 where 판매량 >=" & txt판매량

날짜 데이터

Me.Filter = "판매일자 = #" & txt판매일자 & "#"

Me.Recordsource = "Select * from 제품 where 판매일자 = #" & txt판매일자 & "#"

문자 데이터

Me.Filter = "제품명 = '" & txt제품명 & "'"

Me.Recordsource = "Select * from 제품 where 제품명 = '" & txt제품명 & "'"

like 사용

Me.Filter = "제품명 like '*" & txt제품명 & "*'"

Me.Recordsource = "Select * from 제품 where 제품명 like '*" & txt제품명 & "*'"

and 연산자 사용

Me.Filter = "판매량 >=" & txt판매량 & " AND 제품명 like '*" & txt제품명 & "*'"

Me.Recordsource = "Select * from 제품 where 제품명 >=" & txt판매량 & " AND 제품명 like '*" & txt제품명 & "*'"

 

Filter,FilterOn 속성

   Me.Filter = "[조건]"
   Me.FilterOn = True

   Me.FilterOn = False

RecordsetClone 속성, BookMark 속성, FindFirst 메서드(유일하게 존재하는 1개의 레코드를 찾을 때) 

  Me.RecordsetClone.FindFirst "[조건]"
  Me.Bookmark = Me.RecordsetClone.Bookmark

 RecordSource 속성(한 번만 조회 가능)

 Me.RecordSource = "[SQL문]"

Ado 개체

 엥?! 그거?! 완전 개념 개체 아니냐?

OrderBy, OrderByOn 속성

 오름차순

Me.OrderBy = "필드명 ASC"

Me.OrderByOn = True

 내림차순

Me.OrderBy = "필드명 DESC"

Me.OrderByOn = True

 

3. 매크로

매크로를 다른이름으로 저장하거나 프로시저로 변환할 때는 리본메뉴의 매크로 만들기로 미리 만든다. 

 

 

4. 쿼리 작성 

 검색

Select 필드명 from 테이블/쿼리 where 조건;

 삽입

Insert into 테이블1(필드1, 필드2) select 추가필드1, 추가필드2 from 테이블2 where 조건;

Insert into 테이블(필드1, 필드2) values (추가필드1, 추가필드2);

 삭제

Delete * from 테이블/쿼리 where 조건;

 수정

Update 테이블 set 필드 = 변경값 where 조건;

 

Docmd.runsql "[SQL문]"  

D함수의 조건인수

Not In ([sql문])

In ([sql문])

조건식에서 컨트롤 분리를 하지 않는다.

 기출 ado개체

 

Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset DoCmd.OpenForm "제품정보" rs.ActiveConnection = CurrentProject.Connection rs.Open "select * from 제품별판매현황 where 판매번호=" & txt판매번호 Forms!제품정보.txt판매번호 = rs!판매번호 Forms!제품정보.txt제품명 = rs!제품명 Forms!제품정보.txt판매량 = rs!판매량 Forms!제품정보.txt불량품 = rs!불량품 Forms!제품정보.txt단가 = rs!단가 Forms!제품정보.txt제품평 = rs!제품평 Forms!제품정보.txt거래처명 = rs!거래처명 Forms!제품정보.txt거래처등급 = rs!거래처등급 rs.Close

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