최신기출문제2회
outputto
inputbox
문제2
<2>
filteron은 filter를 활성화 시키는 기능.
따라서 필터제거를 위해서는
: filteron = false 만 써주면 ok
<3>
* close
: 개체유형 및 이름 생략시 현재의 열려있는 폼을 닫는
다
input박스 이용해 폼이 열리기 전에 암호 폼 열리게 하
고 싶다면
: 전체 폼 속성의 on open이벤트에서 시작하기
a = inputbox("암호를 입력하라")
* on open V.S. on load
: on load 가 실행되는 속도가 더 빠르다(on
open보다 선행)
문제3
<1>
* 현재 날짜 및 시간까지 표시하는 함수
: 엑셀하고 똑같이 NOW()쓴다
(cf. 엑셀의 today()는 액세스에서 date(),
엑셀의 date(년,월,일)는 액세스의 dateserial(년,월,
일))
* 날짜 형식 만들기
: yyyy년 mm월 dd일 aaaa hh:mm:ss (24시간)
액세스는 소문자로 써주기. (대소문자 구별 잘하기)
yyyy년 mm월 dd일 aaaa ampm hh:mm:ss
(ampm : 한국어로 오전오후)
<2>
<3> 알아서 푸세염!
문제4
<1>
Docmd.runsql "delete * from 학과 where 학과코드 =
'" & txt_학과코드 & "'"
where조건 하에서 학과 테이블로부터 모든 레코드를 삭
제
(where이하가 없으면 그냥 모든 레코드 삭제임)
※ 이런 문제는 시험장에서 삭제실행까지는 하지 말 것
<2>
1. 학생이 수강하지 않은 학과를 표시하려면:
학과코드를 끌어온 후 표시 해제.
조건행에 Not in (select 학과 from 학생)
학생 테이블의 학과 필드는 행원본이 2개이지만,
바운드 된 것은 실제로 학과코드이므로
저렇게 써도 되는 것.
※※ 2. 관계-조인속성을 반드시 확인할 것.
: '두 테이블의 조인한 필드가 일치하는 행만 포함'에
체크가 되어있으면 안된다.
두번째 속성에 체크되어있어야 함.
('학과'에서는 모든 레코드가, '학생'에서는 조인된 필
드가 일치하는 레코드만 포함)
<3>
조건에 규칙을 작성할 것:
조건 : ([중간고사]+[기말고사]+[출석점수])/3>=90
* 필터에서의 조건문과 인쇄에서의 조건문은 따로 논다.
(즉, 필터에서 조건문 설정했어도 인쇄에서 따로 설정하
지 않으면 필터링되어 뜨진 않음)
최신기출3
문제1
<1>-3
필수라는 말이 없으므로 L이든 ?든 상관없음(숫자는 0이
든 9든 상관없음)
: L00-000;0;#
<2> 관계
관계 편집창에서 아래에 '일대다관계'라고 뜨면 관계 만
들 수 있는 것
<3> 다시 풀 것!!!!!총체적 난국임
보이지 않더라도 열개수는 항상 2개로 해줄 것.
문제2
<1>-1
* 기본보기는 리본메뉴의 '보기'를 설정하는 것
* 왜 단일폼이지?
: 필드선택기가 하나만 보이면 무조건 단일폼
연속폼은 필드 선택기가 여러개로 나뉘어져 있음
<1>-3
[복습要] 액세스의 Dsum함수의 조건 쓰기
* =dsum("[필드명]","개체명","[필드]=[컨트롤]")
답:
=DSum("[재고]","제품","[번호]='" & [txt번호] & "'")
<2>
[복습要] 조건부서식이 행단위로 적용되려면?
right(
<3>
[복습要] 닫기 이벤트프로시저 복습
답:
DoCmd.Close , , acSaveYes
내 오답:
DoCmd.Close acForm, 컨트롤, acSaveYes
문제3
<1> -1
그룹 머리글 구역의 데이터가 다음 페이지로 넘어가더라
도, 그 내용이 계속 표시되도록 : 반복실행구역
<1>-2
그룹별로 일련번호
: '누적합계' - 그룹별,
그런데 컨트롤 원본에 1이 안써짐
--> =1 이라고 써야지 바보야
<1>-3
중복내용 숨기기
<1>-4
그룹별 재고 총합: sum 사용
<2>
* <포함>한다면 연산자'=' 대신 'Like'를 써준다
: Me.filter = "넘버 Like *txt조회*"
-> Me.filter = "넘버 Like '*txt조회*'"
([tip] *도 검색하는 것에 포함되므로 문자로 나올 것.
따라서 ' ' 안에 넣어준다)
-> Me.filter = "넘버 Like '*" & txt조회 & "*'"
[tip] 명령어 형식의 연산자는 반드시 앞과 뒤를 띄어
주는 것 잊지 말자
내 오답:(제대로 작동되긴 함) *을 ''밖에 넣음
Me.Filter = "넘버 like '*" & txt조회 & "*'"
Me.FilterOn = True
<3>
정답:
a = MsgBox("재고리포트를 보시겠습니까?", vbOKOnly +
vbInformation)
DoCmd.OpenReport "재고R", acViewPreview
※ 인포메이션 아이콘 : vbinformation
문제4
<1>
번호별: Left([번호],3)
※ 점수총합 : [점수]
<2>
틀림: 다시하기
<3>
* 컨트롤의 내용이 변경되면 동작하는 이벤트 프로시저
: before update 이벤트
* 조건 불만족 시 아무일도 일어나게 하지 않으려면,
else절을 쓰지 않는다!
답:
Private Sub t관리인_BeforeUpdate(Cancel As
Integer)
a = MsgBox("패널티를 부여하겠습니까?", vbYesNok, "
패널티")
If a = vbYes Then
If 점수 >= 90 Then
점수 = 점수 - 1
End If
End If
최신기출문제 4회
<모르겠는 문제>
'출판여부'필드에 y,n이외의 값 입력되지 않게 데이터
형식을 설정하시오
문제2
<2> 조건부서식
문제3
<1>-1 =[IBSN] & "/" & [회원ID]썼더니 자꾸 매개변수
뜸 ---> =[ISBN] & "/" & [회원ID] 이게 맞는 것.
(필드명 오타)
문제3
<1>-4
=iif([대여일자]<=2015-3-1,count(*),"0") --> (x)
= dcount("[대여일자]","자료종합","[대여일자]<=#" &
2015-3-1 & "#") --> (x)
<아릿까릿한 문제>
문제2
<1>-5
잘 구현됨.
'컴퓨터활용능력1급 > 컴활1급 실기' 카테고리의 다른 글
취성패_컴활1급_25일차 <엑셀 최신기출15회> (0) | 2016.12.23 |
---|---|
취성패_컴활1급_23일차 (0) | 2016.12.22 |
취성패_컴활1급_20일차 <쿼리> (0) | 2016.12.19 |
취성패_컴활1급_19일차 (0) | 2016.12.16 |
취성패_컴활1급_18일차 <콤보상자 컨트롤속성, 컨트롤 하위폼 삽입> (0) | 2016.12.15 |