DOUBLE_PLANET 2017. 2. 11. 15:12
728x90
반응형

관리인 그룹 머리글 구역의 데이터가 다음 페이지로 넘어가더라도 그 내용이 계속 표시되도록 = 반복구역설정


txt순번 컨트롤에는 그룹별로 인련번호가 표시되도록 설정하시오 > 컨트롤원본 =1. 누적합계=그룹


t관린인 컨트롤의 내용이 변경되면 이벤트프로시저

미리보기 그림과 같이 제목 : 패널티 내용 : 패널티를 부여하겠습니까? 표시 

<예> 클릭하면 점수를 다시 계산하여

점수가 90이상인ㄱ경우 점수에 1점을 감할 것. 이외의 경우는 변경X

Before update.



속성시트 before Update - 이벤트 프로시저 - 작성기

Private Sub t관리인_BeforeUpdate(Cancel As integer)

a = msgBox("패널티를 부여하겠습니까?" , vbYesNo "패널티")

If a = vbYes And 점수 >= 90 Then

점수 = 점수 -1

else

 Docmd.CancelEvent

End If

End Sub 



사원검색 폼의 cmb코드 컨트롤이 업데이트되면 다음과 같으,은 기능

cmb코드에서 지정한 사원에 해당하는 정보를 찾아 푯

현재 폼의 REcordSource 속성을 이용한 ㅍ이벤트 프로시저



Private Sub cmd코드_AfterUpdate()

Me.RecordSource = "select * from 사원 where 코드 = '" & cmb코드 & "'"

End Sub



전화번호 필드에 입력시 입력마스크가 (###)-###-#### 형태, 기호저장X . #를 사용할 것.

\(###\)-###-####;;#


728x90
반응형