하위폼이 기본 폼의 '번호'에 해ㅑ당하는 예약내역만을 표시하도록 설정하시오.
기본 폼 연결 - 번호-
하위 폼 연결 - 담당직원
폼바닥글의 TXT계약금액 컨트롤은 <예약내역> 하위 폼의 TXT예약 컨트롤의 값에 10000을 곱한 값을 표시
=TXT계약금액의 컨트롤 원본의 작성기 단추를 클릭하여
=[예약내역].[FORM!][TXT예약]*10000
예약내역 폼의 TXT예식홀이름 컨트롤에는
예식관 테이블의 번호와 TXT예식관의 값이 일치하는
예식관 테이블의 홀이름을 표시하도록 설정하시오.
TXT예식홀이름 컨트롤 원본에
=DLOOKUP("[홀이름]","예식관","[번호]=[TXT예식관]")
옝약관리 폼이 활성화돠될 때 지시사항
TXT이름 컨트롤로 포커스가 이동되도록 설정하고, 글꼴스타일 굵게
예약관리 폼에서 / 폼 선택기를 선택한 후 / ON ACTIVATE / 작성기 클릭
PRIVATE SUB FORM_ACTIVATE( )
TXT이름.SETFOCUS
TXT이름.FONTBOLD = TRUE
END SUB
하고 ALT Q 눌러서 VBE닫고 엑세스로 돌아옴.
TXT메일주소 컨트롤은 메일주소 메일서버 필드를 이용하여 표시 예와 같이 나ㄴ타나도록.
컨트롤 원본 들어가서 =[메일주소] & "@" & [메일서버]
TXT기본통화 > 기본통화(초) 로 바운드 시키는데, 초단위로 입력되어있으므로 분단위로 환산
컨트롤원본에 =[기본통화(초)/60
TXT조회 컨트롤을 콤보상자로 변경
오른쪽 클릭해야되는거다..
모두 > 행원본> 요금명 테이블의 요금코드만 더블클릭 > 저장
통신요금내역 폼에서 폼의 바닥글에 명령단추마법사를 이용하여 명령단추를 작성하고
명령단추그림 : 마지막으로 이동
명령단추이름 : CMD마지막
통신요금내역 디자인보기>
컨트롤마법사 사용 + 단추
명령단추마법사에
종류 : 레코드 탐색 >
매크로 함수 : 마지막 레코드로 이동
그림 : 마지막으로 이동1
CMD마지막을 입력하고 마침.
통신요금내역 폼의 소액결재고객검색(cmd검색) 버튼을 클릭하면 소액결제 필드의 값이 1 이상
통화내역정보만 나타내도록.
Applyfilter 매크로 함수 이용
매크로 일므은 M작성
소액결재고객검색cmd검색 버튼에서 이벤트작성 > 매크로작성기
매크로 함수를 ApplyFilter
매크로 함수 인수 > [소액결제]>=1
TXT금액 = txt시간 / 60 *50+txt문자 *30
= [txt시간]/60*50+[txt문자]*30
=count(*)&"건"
=[page] & "쪽 /" & [pages] & "쪽"
cmd조회 > 조회기능 수행 > 이벤트 프로시저
txt조회에 선택된 문자와 동일한 요금코드만을 대상으로
RecordSource 속성
요금명 > Cmd조회 > 이벤트작성 > 코드작성기
Private Sub cmd조회_click()
Me.RecordSource = "SELECT * FROM 요금명 WHERE 요금코드 = '" & txt조회 & "' "
End Sub
요금명 폼의 납입내역 미리보기 cmd인쇄 버튼을 클릭하면 이벤트 프로시저
요금보고서 미리보기 형태로
Docmd
이거 이지하지?
cmd인쇄 > 오른쪽버튼 > ㅇ이벤트작성 > 코드 작성기
Private Sub cmd인쇄_Click( )
DoCmd.OpenReport "요금보고서", acviewpreview
End Sub
댓글