Dlookup("필드명“,”원본“,”조건“)
=DLookUp("거래처명","거래처", "[거래처번호]=[forms]![상품목록]![거래처번호]")
매크로 조건
[필드명]=[Forms]![현재폼의이름]![텍스트상자의컨트롤명]
[거래처명]like "*" & [forms]![거래처관리]![txt조회]&“*”
정렬
Me.OrderBy = "학번 ASC"
Me.OrderByOn = true
필터적용
Me.Filter = "학번= '" & txt학번 & "'"
Me.FilterOn = true
| 문자열 | Me.filter = "필드명 = '" & 컨트롤명 & "'" | ||
| 숫자 | Me.filter = "필드명 = " & 컨트롤명 | ||
| 숫자+함수 | Me.filter = "year([거래일자]) = " & 컨트롤명 & " and month ([거래일자]) = " & 컨트롤명 | ||
| 날짜형 | Me.filter = "필드명 =#" &컨트롤명& "#" | ||
| 문자열 일부와 일치 | Me.filter = "필드명 like '*" & 컨트롤명 & "*'" | ||
Docmd.Applyfilter,조건
보고서 열기
Docmd.openform "폼이름", 여는방법,필터이름,"조건"
Docmd.openreport "보고서명", 여는방법,필터이름,"조건"
Docmd.OpenForm "학생", acNormal,,“학번 = ‘“& txt학번 & ”’”
(학번필드와 txt학번 컨트롤과 일치하는 학생폼을 여시오)
Docmd.OpenForm "학생", acPreView,,“학번 = ‘“& txt학번 & ”’”
(학번필드와 txt학번 컨트롤과 일치하는 학생폼을 인쇄미리보기로 여시오)
Docmd.OpenReport “학생”,acViewPreview,,“학번 = ‘“& txt학번 & ”’”
(학번필드와 txt학번 컨트롤과 일치하는 학생보고서를 인쇄미리보기로 여시오
보고서 닫기
Docmd.close 개체유형(폼,보고서 등), "개체이름", 저장여부(확인)
구역1;구역2;구역3
구역1: 사용자 지정 기호
0 : 필수, 계산 불가능, 공백 불가능
9: 선택, 계산 불가능, 공백 가능
#: 선택, 계산가능 , 공백 가능
구역2: 기호저장유무 - > 0
구역3: 화면표시기호
메시지 상자 표시
dim a
a= MsgBox("폼을 닫으시겠습니까?", vbYesNo, "폼닫기")
if a = vbYes then
DoCmd.Close, , acSaveYes
end if
MsgBox " 오늘 날짜는 " & Date & "입니다."
txt년 = Year(Date)
처리 기능 구현
함수
| Is Null | 비어있다 | |
| Like "*특*" | "특"이 포함 | |
| Not In (select 업체코드 from 거래) | <현재> 테이블에는 업체코드가 있지만 <거래>테이블에는 업체코드가 없다. | |