미스털이 sub

(문제 출처 : https://m.cafe.daum.net/hermingway/ZYwR/39?listURI=%2Fhermingway%2FZYwR ) ​ 액세스 컴활 실기문제를 계속해서 풀어보자. 이벤트 프로시저 구현하기 === 먼저 vb창 열고 이벤트를 선택하면 다음과 같이 cmd조회_Click이란 이벤트 프로시저가 만들어진다. 그리고 판매정보를 나타내게 하려면 제품판매정보의 제품코드에 해당되는 데이터를 나열해주면 된다. SELECT * FROM 제품판매정보 WHERE 제품정보 = txt제품코드 다음과 같이 만들었는데 MsgBox는 테스트가 잘됐다면 지워준다. Private Sub cmd조회_Click() qry = "SELECT * FROM 제품판매정보 WHERE [제품코드] = '" & cmb제품코드..

(문제 출처 : https://blog.naver.com/hellstudy/223302615932 ) ​ ​​​액세스 컴활 실기문제를 계속해서 풀어보자. === onGotFocus 이벤트 이해하고 풀기 주로 이벤트하면 클릭이벤트만 생각했는데 ->onClick 포커스 역시 이벤트 장치할 수 있다. ->onGot(얻다)Focus(포커스) 우선 이벤트에 대한 이벤트프로시저를 선언 txt수량 컨트롤러 선택후 [이벤트]->[OnGotFocus]->이벤트 프로시저 선택하고 VBA창 열어준다. 그리고 VBA창에 생성된 sub프로시저에 다음과 같이 스크립트를 작성한다. Private Sub txt수량_GotFocus() returnMsg = "" If txt수량 >= 10 Then returnMsg = "인기품종" E..

(문제 출처 : https://blog.naver.com/hellstudy/223302615932 ) ​​​​​​​액세스 컴활 실기문제를 계속해서 풀어보자. === 우선 [이벤트]->[On Click]의 속성값에 [이벤트 프로시저]를 클릭 그리고 맨 우측의 버튼을 클릭하면 코드 작성창이 나온다. 그리고 코드를 다음과 같이 적어준다. OrderBy는 적용할 구문(필드 + ASC/DESC) OrderByOn은 적용 여부 === 내림 버튼 적용 우선 [이벤트]의 [On Click]의 맨 우측 버튼을 눌러 [코드 작성기] 선택 그리고 코드작성하는 창이 나타나는데 아까 만들었던 것을 참고해서 ASC대신 DESC를 넣어서 완성시킨다.

(문제 출처 : https://m.cafe.daum.net/hermingway/ZYwR/38 ) ​​​​​데이터베이스 컴활 실기문제를 계속 풀어보자. === 이벤트 프로시저 만들기 먼저 조회 버튼 컨트롤 선택 후, [이벤트]->[On Click]의 속성 창 불러오고 [코드 작성기] 선택 RecordSource의 질의문 중 WHERE구절을 Filter에 기입시켜주면 두 명령의 효과는 동일하다. Private Sub cmd조회_Click() If IsNull(txt조회) Then MsgBox "조회할 평가년도를 입력하세요." Else ' Filter, FilterOn의 효과와 동일한 RecordSource ' Me.RecordSource = "SELECT * FROM 직무평가 WHERE 평가년도 = " & ..