● 다음의 지시사항대로 작업하여 '제품별조회' 폼을 완성하시오.
1. 문제
폼에 있는 <종료> 버튼(cmd종료)을 클릭하면 다음과 같은 기능을 수행하도록 이벤트 프로시저를 구현하시오.
-Time 함수를 사용하여 재 시간을 표시할 것
- '예' 버튼을 선택했을 때만 폼을 종료할 것
- 기본적으로 '아니요'버튼이 선택되어 있도록 설정 할 것
- <그림>과 같은 메시지 상자로 표시할 것
정답은
Dim aa
aa = MsgBox(Time & " 종료할까요?", vbYesNo + vbDefaultButton2, "")
If vbYes Then
DoCmd.Close
End If 입니다.
이것을 Dim aa 즉, 변수 aa를 선언을 안하고, MsgBox 괄호를 지움으로써
아래와 같이 변경해도 시험장에서 정답처리해주려나요?
(실행시 같은결과가 나옵니다.)
MsgBox Time & " 종료할까요?", vbYesNo + vbDefaultButton2, ""
If vbYes Then
DoCmd.Close
End If
2. 문제
<업데이트> 버튼(cmd업데이트)를 클릭하면 다음과 같은 기능을 수행하는 이벤트 프로시저를 구현하시오.
- <제품코드> 테이블의 '제조사' 필드의 값 중 마지막 2자리가 '전기'이면 '전기협회'를, '전자'이면 '전자협회'를 '협회' 필드에 업데이트 할 것
- Docmd와 RunSql, Right 함수를 이용할 것
정답은
DoCmd.RunSQL "update 제품코드 set 협회 = '전기협회' where right(제조사,2)='전기'"
DoCmd.RunSQL "update 제품코드 set 협회 = '전자협회' where right(제조사,2)='전자'"
입니다.
여기서 '전기협회'대신 전기협회로 작은따옴표없이 작성해도 정답처리가 되나요?
궁금합니다!
3. 엑세스의 프로시저나 메크로는 코드 작성 후 실행이 되나 안되나 반드시 확인을 해야하나요?
시험장에서 실행유무를 확인을 안하고 그냥 진행해도 감점이 안되나요?
안녕하세요.
1. 작성해 주신대로 작업하셔도 결과가 지시사항대로 작동이 되니 정답처리될 것 같습니다.
코드는 여러가지가 있을 수 있으니 효율적인 방법을 찾아나가시는 것도 좋은 방법입니다.
2. set 협회 = '전기협회' 에서 '전기협회'는 컨트롤명이 아니라 데이터의 '전기'를 '전기협회'로 업데이트하는 것이기때문에 작은따옴표로 구분한 것입니다.
말씀하신대로 작은따옴표없이 입력할 경우 컨트롤로 인식해서 전기협회의 매개변수값을 요청하는 메시지가 나타나게 되어 결과값이 달라집니다.
3. 실행 안해도 감점은 안되지만 틀렸는지 확인하실 필요는 있으십니다.
좋은 하루 보내세요.
-
*2018-08-02 09:18:37
안녕하세요.
1. 작성해 주신대로 작업하셔도 결과가 지시사항대로 작동이 되니 정답처리될 것 같습니다.
코드는 여러가지가 있을 수 있으니 효율적인 방법을 찾아나가시는 것도 좋은 방법입니다.2. set 협회 = '전기협회' 에서 '전기협회'는 컨트롤명이 아니라 데이터의 '전기'를 '전기협회'로 업데이트하는 것이기때문에 작은따옴표로 구분한 것입니다.
말씀하신대로 작은따옴표없이 입력할 경우 컨트롤로 인식해서 전기협회의 매개변수값을 요청하는 메시지가 나타나게 되어 결과값이 달라집니다.3. 실행 안해도 감점은 안되지만 틀렸는지 확인하실 필요는 있으십니다.
좋은 하루 보내세요.