6.2 공통 대화상자 사용하기.

Slides:



Advertisements
Similar presentations
내 마음의 버 스 이천신하교회 청년부. 이름 : 한상훈 나이 : 30 살 종교 : 기독교 ( 모태신앙 ) 생활신조 : 인생은 한방 ! 로또나 사자 이상형 : 청순 가련한 모태미녀 특이사항 : 걸그룹 노래에 환장함 식스팩을 갖기엔 슬픈 몸을 타고 남.
Advertisements

독서골든벨 2009 학년도 6 학년 1 학기 6-10 반. 1. 이야기 삼국유사 정대한 원효대사는 수행을 위해 떠나던 중 피곤하여 숲 속에서 잠이 들었다. 잠결에 너무 목이 마른 나머지 어디에 담겨있는 물을 맛있게 마셨나요 ?
두 손 들고 두 손 들고 찬양합니다 두 손 들고 찬양합니다 다시 오실 왕 여호와께 다시 오실 왕 여호와께 두 손 들고 찬양합니다 두 손 들고 찬양합니다 다시 오실 왕 여호와께 다시 오실 왕 여호와께 오직 주만이 나를 다스리네 오직 주만이 나를 다스리네 나 주님만을.
5장5장5장5장 개요 폼 개체 다중폼 개요 폼 개체 다중폼 다중폼. 2 학습목표 폼 개체를 학습한다. 다중폼에 대하여 학습한다.
지금은 기도 하는 시간입니다 1. 송구영신예배를 위해서 2. ‘크리스마스 이브’ 행사를 준비하는 교육 기관을 위하여
대기전력저감프로그램 인터넷 신고 방법 에너지관리공단 효율표준실 1.
메모장 다루기 A. 메모장 실행법 시작>모든 프로그램> 보조 프로그램>메모장 Notepad
VISUAL BASIC 양 계 탁.
데이터형, 변수, 연산자 컴퓨터 응용 및 실습 I.
3.1 그래픽스/영상 데이터 형 3.2 널리 사용되는 파일 형태
1파일열기와 저장하기 폴더 지정방법 2 처음 파일을 만들려면 3 음자리표 입력하기 4 조표 입력 5 박자 입력 방법
현대사회의 여성문제와 여성복지 3조 권경욱 강향원 황대인 변갑수 박창욱 김지현.
6.4/5/6 상태표시줄 등 6.4 상태표시줄 사용하기 6.5 진행표시바 사용하기 6.6 슬라이더 사용하기
고교평준화의 득과 실 김영주 이지영 최윤영.
예제로 배우는 Visual Basic 계산기로 익히는 연산자
개정판 Visual Basic 6.0 바로가기.
메신저 V6.0 제품 개요 제안제품 개요 제 품 명 제 조 사 제품 개요 제품 구성 요소 및 주요 기능
프로시저 와 인수전달 컴퓨터응용 및 실습 I.
응용프로그램 예제 컴퓨터응용 및 실습 I.
인스톨쉴드9 데브스튜디오 사용 매뉴얼 (VB6에서 개발후 배포프로그램 만들기)
제 2 장 기본 문법 (1-2) 주제 : 객체, 변수, 모듈, 상수.
5장 기본 컨트롤 응용프로그래밍.
Chapter 1 디지털 영상처리의 개념.
비주얼 베이직 프로그래밍 개요 비주얼 베이직 6.0 살펴보기 비주얼 베이직 6.0 설치 비주얼 베이직 6.0의 개발 환경
6.1 리치 텍스트 상자 사용하기.
9.3 데이터컨트롤을 제어하는 프로그램 9.4 DBGrid를 사용하는 프로그램
학습목표 변수 비주얼 베이직 자료형 변수 선언하기. 학습목표 변수 비주얼 베이직 자료형 변수 선언하기.
예제로 배우는 Visual Basic 성적처리기로 익히는 체크박스와 옵션버튼
Software Engineering Project
ADO컨트롤을 이용하여 데이터를 관리하는 방법과 데이터베이스내의 레코드들을 리포트 형식으로 출력하는 디자인 기능을 알아본다.
Visual Basic 연산자.
5 장 객체 지향 프로그래밍 5.1 객체 지향 프로그래밍의 개념 5.2 객체 지향 프로그래밍
DataScience Lab. 박사과정 김희찬 (월)
ASP.NET Mobile Controls
RFID Programming (출결관리 프로그램)
6.3 툴바와 이미지 리스트 사용하기.
6.3 툴바와 이미지 리스트 사용하기.
3 장 Visual Basic 2010 기본 문법 3.1 변수 3.2 데이터 형식 3.3 연산자 3.4 제어문
SK증권 API 이용방법 강사: 말과의미(SK증권 방배역지점 정광옥차장) 계좌개설 및 계좌관리, 선물옵션 협의수수료 문의
2010년 직원연수 자료 제1차 : 4월 16일 ~ 17일 제2차 : 4월 23일 ~ 24일
Visual Basic 반복문.
1.파일 보기 프로그램 디자인(1) 기능 모든 드라이브/디렉토리를 검색 그림 파일인 경우 미리 보기 기능
Serial 통신(RS-232) 2 김성환 기계설계 자동화 공학부 비주얼베이직의 기초사항을 공부합니다.
3 장 Visual Basic 2010 기본 문법 3.4 제어문 1) 조건문 2) 반복문 3) 기타 제어문
6.2 공통 대화상자 사용하기.
부록 A Matlab 활용.
▶ GTQ - Photoshop 어플리케이션 바 메뉴 표시줄 옵션바 4. 툴 패널 5. 총 30개의 패널
성희롱성폭력 온라인 예방교육 이수 방법 포스텍 학생상담센터 성희롱성폭력 상담실.
목차 INDEX 1. 회원가입 및 로그인 2. 업체정보 3. 제조검사 신청 4. 인보이스 5. 검사진행현황(현장검사 신청)
주제 : 배열, 사용자정의 데이터형, 프로시저와 함수 등..
키타노카시쇼쿠닌(北の菓子職人) - 「오호츠크의 소금 맛」
Internet 데이터 전송 목표: 인터넷의 개요 및 기본 내용을 살펴보고 VB에서의 데이터 전송 프로그래밍에 대하여 학습한다. 주요내용 인터넷의 개요 인터넷 데이터 전송 인터넷 프로그래밍 Winsock Client Server 프로그래밍.
6.4/5/6 상태표시줄 등 6.4 상태표시줄 사용하기 6.5 진행표시바 사용하기 6.6 슬라이더 사용하기
U N I X 창원대학교 전자계산학과 김병찬.
작성일 참고서적 – Programing Game AI by Example
9. 데이터베이스 두 개의 테이블 조인해서 보기.
2장 비주얼베이직 시작하기 2.1 비주얼베이직 프로그래밍 스타일 2.2 비주얼베이직 시작하기.
마이페이지(사회공헌대표계정) PCK 통합 프로젝트 Date / Version Prepared by
매크로의 정의 반복적인 업무를 자동화하는 것을 말하며, 엑셀 에서 동작하는 매크로를 작성하기 위해서는 사용 하는 언어가 VBA(Visual Basic for Application) 입니다. VBA는 엑셀에서만 사용하는 매크로 언어가 아니 라 워드, 파워포인트,
백업 PC에서 데이터 불러오기 (VBA 코드)
코딩체험교실 아두이노 로봇 코딩 4차산업기술 체험 (SW코딩/자율주행기술).
기술가정 2학년 2학기 4. 컴퓨터와 생활 >1) 소프트웨어의 활용 > 2~3/18 그림 자료는 어떻게 만들까?
제안 제도 운영방안.
2장 첫 번째 응용 프로그램 작성
워드데이터 삽입 엑셀 차트의 삽입 소리와 동영상 삽입 워드 문서로 파일 저장
유예 X-FILE *조사자* 1301권희원 1315이예지 1317장아정 1322홍자현.
나-는 믿음으로 주 얼굴 보리니- 아침에 깰 때에 주형상에 만족하리 나주님 닮기 원하네 믿음으로 주얼굴 보리라 -
File IO 정보물리.
책을 읽읍시다  탈향 진지하게 설명해드림 1303 김소희 1309박지호 1315이지수.
2016년 제1차 운영위원회 평택시건강가정 ∙다문화가족지원센터
Presentation transcript:

6.2 공통 대화상자 사용하기

공통 대화상자 공통대화상자(Common Dialog Box)란? 윈도우 시스템에서 공통으로 사용되는 ( ) 6개 윈도우 시스템에서 공통으로 사용되는 ( ) 6개 파일 열기 : File Open 파일 저장 : File Save 색상 지정 : Color 글꼴 지정 : Font 인쇄 : Print 도움말 : Help  제외 2019-02-21 수원과학대 컴퓨터정보과

확장 컨트롤 추가 [프로젝트]>[구성요소] 또는 Ctrl+T Microsoft Common Dialog Control 6.0 추가 네모난 아이콘이 생김. 타이머 처럼 폼에는 보이지만 실행시에는 보이지 않는다. 2019-02-21 수원과학대 컴퓨터정보과

기능 설명 (p.209) 화면 구성 Label CommonDialog RichTextBox1 Command6 Command1 명령버튼을 만드는 순서에 따라 Tab을 눌렀을 때, 선택되는 순서가 결정된다. 관련속성 : TabIndex Command1에서 부터 Command6까지의 TabIndex를 살펴볼것 2019-02-21 수원과학대 컴퓨터정보과

기능 설명 (p.209) 파일 열기 2019-02-21 수원과학대 컴퓨터정보과

기능 설명 (p.209) 파일 저장 2019-02-21 수원과학대 컴퓨터정보과

기능 설명 (p.209) 색상 지정 폼의 바탕색을 해당 색으로 바꾼다. 2019-02-21 수원과학대 컴퓨터정보과

기능 설명(p.209) 글꼴 지정 리치텍스트 상자의 출력 글꼴을 바꾼다. 2019-02-21 수원과학대 컴퓨터정보과

기능 설명 (p.209) 인쇄하기 해당 문서를 프린터로 출력한다. 2019-02-21 수원과학대 컴퓨터정보과

객체 만들기(p.210) 객체 (이름) 지정 Label1 (이름) = comDlg (이름) = RTBox Command6 2019-02-21 수원과학대 컴퓨터정보과

코딩하기(p.211) 파일 열기 버튼 더블클릭하여 코딩 파일 형식 목록에 표시될 항목 문자열 “|(shift+\)”로 분리 Filter에 지정된 파일 형식들 중에서 기본적으로 선택되는 항목 지정 (여기서는 두번째 항목(txt File)이 기본) 파일 열기 대화상자를 연다. 대화상자에 입력된 파일을 리치텍스트상자(RTBox)에 올리고(LoadFile 메소드), Label1에 파일 이름을 출력한다. 2019-02-21 수원과학대 컴퓨터정보과

코딩하기(p.211) 공통 대화 상자의 메소드 메소드 기능 파일 열기 대화상자 표시 다른이름으로 저장하기 대화상자 표시 색상 지정 대화상자 표시 글꼴 지정 대화상자 표시 인쇄하기 대화상자 표시 도움말 대화상자 표시 2019-02-21 수원과학대 컴퓨터정보과

코딩하기(p.212) 공통대화상자의 속성 속성 기능 대화상자의 “파일 형식”상자에 나열될 파일 형식 “ 파일형식명|확장자”로 지정한다. 동일 파일 형식에 여러 파일 확장자를 표시할 경우 “;”으로 분리한다. “모든파일(*.*)|*.*|일반문서|*.txt;*.rtf” Filter에 지정된 형식 중 기본으로 표시될 형식의 번호 선택된 파일의 이름 (경로포함) 선택된 파일의 이름 (파일이름만) DefaultExt 대화상자에서 기본적으로 할당하는 확장자 2019-02-21 수원과학대 컴퓨터정보과

코딩하기(p.212) 파일 저장 버튼 더블클릭하여 코딩 이미 존재하는 파일 이름을 지정한 경우 확인을 하게 하는 플래그 다른 이름으로 저장하기 창 보여줌 cdlOFNAllowMultiSelect 복수 개 파일의 선택 허용 cdlOFNHideReadOnly 읽기 전용 체크 상자 숨기기 cdlOFN 이미 존재하는 파일의 경우 덮어쓰기 확인 상자 표시 2019-02-21 수원과학대 컴퓨터정보과

코딩하기(p.213) 색상 지정 버튼 더블클릭하여 코딩 cdlCC 색상 지정 창을 보여줌. 폼의 바탕색을 색상 지정 창에서 선택한 색으로 변경함. cdlCC 색상 대화상자를 확대해서 옆에 색상을 더 구체적으로 지정할 수 있는 화면을 표시 (사용자 지정 색 만들기 옵션 선택 효과) 사용법) ComDlg.Flags = cdlCCFullOpen 2019-02-21 수원과학대 컴퓨터정보과

코딩하기(p.213) 글꼴 지정 버튼 더블클릭하여 코딩 글꼴 지정 창을 보여줌. 공통대화상자에서 지정한 글꼴 속성으로 리치 텍스트 상자의 글꼴을 변경함 2019-02-21 수원과학대 컴퓨터정보과

코딩하기(p.214) 공통대화상자의 글꼴 관련 속성 공통대화상자의 글꼴 관련 플래그 FontBold 굵게 FontItalic 기울임 FontStrikethru 취소선 FontUnderline 밑줄 FontName 글꼴 이름 FontSize 글꼴 크기 Color 글꼴의 색 cdlCFPrinterFonts 인쇄용 글꼴만 표시 cdlCFScreenFonts 화면용 글꼴만 표시 cdlCF 인쇄용/화면용 글꼴 모두 표시 cdlCFEffects 취소선, 밑줄, 색 등 효과 상자 표시 셋 중에 하나는 반드시 지정해야 함. 2019-02-21 수원과학대 컴퓨터정보과

코딩하기(p.215) 인쇄하기 버튼 더블클릭하여 코딩 인쇄 창을 보여줌. 인쇄할 매수를 지정 인쇄관련 속성 기능 FromPage 인쇄 시작 페이지 지정 TopPage 인쇄 끝 페이지 지정 Copies 인쇄 매수 지정 2019-02-21 수원과학대 컴퓨터정보과

코딩하기(p.215) 종료하기 버튼 더블클릭하여 코딩 2019-02-21 수원과학대 컴퓨터정보과

추가 기능 - 1 화면 재구성 필터 수정 파일 열기 버튼 레이블 : BackStyle 투명설정 리치텍스트 상자 : 수직 스크롤바 설정 필터 수정 all files -> 모든파일 txt files -> 텍스트파일 : *.frm 도 포함시킴 파일 열기 버튼 frm 또는 txt 파일만 열고 다른 파일을 열기 시도하면 에러 출력 2019-02-21 수원과학대 컴퓨터정보과

추가 기능 - 1 Private Sub Command1_Click() Dim 확장자 As String RTBox.Text = "" Label1.Caption = "" ComDlg.Filter = "( )" ComDlg.FilterIndex = 2 ComDlg.ShowOpen 확장자 = ( ) If ( ) Then RTBox.LoadFile ComDlg.FileName Label1.Caption = ComDlg.FileName Else ( ) "확장자가 txt, rtf, frm인 파일만 열 수 있습니다.", _ vbInformation + vbOKOnly, "열수없는 파일" End If End Sub 2019-02-21 수원과학대 컴퓨터정보과

추가기능 - 2 폼을 늘려서 이미지 컨트롤 추가 파일열기를 클릭시.. BorderStyle : 1-단일고정 Stretch : true 파일열기를 클릭시.. 모든파일 / 텍스트파일 / 그림파일 로 설정 그림파일 : *.jpg, *.bmp, *.wmf 확장자가 jpg, bmp, wmf 파일인 경우 이미지가 보이게 (loadpicture()사용) 6장1을 참조 2019-02-21 수원과학대 컴퓨터정보과

추가기능 - 2 Dim 확장자 As String RTBox.Text = "" Image1.Picture = LoadPicture() Label1.Caption = "" ComDlg.Filter = "( )" ComDlg.FilterIndex = 2 ComDlg.ShowOpen 확장자 = ( ) If ( ) Then RTBox.LoadFile ComDlg.FileName Label1.Caption = ComDlg.FileName ElseIf ( ) Then Image1.( ) = ( )(ComDlg.FileName) Else MsgBox "텍스트 파일(txt/rtf/frm) 또는 그림파일(bmp/jpg/wmf)만 열 수 있습니다.", vbInformation + vbOKOnly, "열 수 없는 파일" End If 2019-02-21 수원과학대 컴퓨터정보과

추가기능 - 3 색상지정 버튼 취소를 눌렀을 때 배경이 검정으로 변함 이유 : 취소를 인식하지 않고 색상값이 RGB(0,0,0) 즉, 검정색이 넘어오기 때문 comdlg.CancelError 를 true로 설정하여 취소 버튼이 눌리면 에러처리 루틴으로 건너뛰게 해주어야 함 취소버튼이 리턴하는 에러 값 : 32755 2019-02-21 수원과학대 컴퓨터정보과

추가기능 - 3 Private Sub Command3_Click() On Error GoTo CLR_ERR ‘ 공통대화상자의 취소 버튼을 에러 처리하여 정상수행되지 않게 함 ComDlg.( ) = True ComDlg.ShowColor Form1.BackColor = ComDlg.Color ComDlg. ( ) = False CLR_ERR: If ( ) <> 0 And ( ) <> 32755 Then MsgBox "에러번호 : " & Err.Number & vbCrLf & _ "에러내용 : " & Err.Description, vbCritical + vbOKOnly, _ "에러발생" End If End Sub 2019-02-21 수원과학대 컴퓨터정보과

추가기능 - 4 Command7 컨트롤 배열을 생성한다. (복사 > 붙여넣기 > 컨트롤배열 작성 ? > 예선택) Command8 컨트롤 배열을 생성한다. 2019-02-21 수원과학대 컴퓨터정보과

추가기능 - 4 컨트롤배열 Command7(0) ~ Command7(3) 생성 이벤트프로시져에 Index를 넘겨준다. Private Sub Command7_Click(Index As Integer) RTBox.( ) = Command7(Index).( ) End Sub Private Sub Command8_Click(Index As Integer) RTBox.( ) = Command8(Index).( ) 2019-02-21 수원과학대 컴퓨터정보과

추가기능 - 5 종료버튼 Private Sub Command6_Click() If MsgBox("정말 종료하시겠습니까?", vbQuestion + vbYesNo, _ "종료확인") = vbYes Then ( ) End If End Sub 2019-02-21 수원과학대 컴퓨터정보과