[VB] MSFlexGrid 클래스 사용하기
■ MSFlexGrid 클래스를 사용하는 방법을 보여준다. 1. 프로젝트 / 구성 요소 메뉴를 클릭한다. 2. "컨트롤" 탭에서 "Microsoft FlexGrid Control 6.0" 항목을 체크한다.
[태그:] VB
[VB] DirListBox 클래스 : Path 속성을 사용해 현재 디렉토리 설정하기
■ DirListBox 클래스의 Path 속성을 사용해 현재 디렉토리를 설정하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 |
pDirListBox1.Path = "c:\temp" |
[VB] FileListBox 클래스 : Filename 속성을 사용해 현재 파일명 설정하기
■ FileListBox 클래스의 Filename 속성을 사용해 현재 파일명을 설정하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 4 5 6 7 |
pFileListBox1.FileName = "a.txt" 또는 pFileListBox1.FileName = "*.dll" |
[VB] DrvieListBox 클래스 : Drive 속성을 사용해 현재 드라이브 설정하기
■ DrvieListBox 클래스의 Drive 속성을 사용해 현재 드라이브를 설정하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 |
pDriveListBox1.Drive = "d:" |
[VB] TIMEVALUE 함수를 사용해 DATE 구하기
■ TIMEVALUE 함수를 사용해 DATE를 구하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 |
Print TimeValue("2015-05-17 17:48:20") |
[VB] DATE 구하기
■ DATE를 구하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 4 5 6 7 |
Dim dteSource As Date dteSource = DateSerial(2014, 5, 17) + TimeSerial(17, 48, 0) Print dteSource |
[VB] DATEVALUE 함수를 사용해 DATE 구하기
■ DATEVALUE 함수를 사용해 DATE를 구하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 |
Print DateValue("2015-05-17") |
[VB] TIMESERIAL 함수를 사용해 시간을 갖는 DATE 구하기
■ TIMESERIAL 함수를 사용해 시간을 갖는 DATE를 구하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 4 5 6 7 |
Dim dteSource As Date dteSource = TimeSerial(17, 48, 0) Print dteSource |
[VB] DATESERIAL 함수를 사용해 날짜를 갖는 DATE 구하기
■ DATESERIAL 함수를 사용해 날짜를 갖는 DATE를 구하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 4 5 6 7 |
Dim dteSource As Date dteSource = DateSerial(2014, 5, 17) + TimeSerial(17, 48, 0) Print dteSource |
[VB] 기타 함수 사용하기
■ 기타 함수를 사용하는 방법을 보여준다. ▶ 표
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
───────────────────────── 함수명 기능 ───── ─────────────────── Array 초기 값을 주어서 배열을 만든다. ChrDir 현재의 디렉토리를 구한다. ChDir 현재의 디렉토리를 변경한다. GetAttr 지정한 파일의 속성을 구한다. Dir 조건에 맞는 파일을 찾는다. IsArray 변수가 배열인지 조사한다. IsDate 자료가 날짜형인지 조사한다. IsEmpty 자료가 초기화 되었는지 조사한다. IsNumeric 자료가 숫자형인지 조사한다. RGB 빨강, 초록, 파랑으로 색깔을 혼합한다. ───────────────────────── |
[VB] 데이터 타입 변환 함수 사용하기
■ 데이터 타입 변환 함수를 사용하는 방법을 보여준다. ▶ 표
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
============================================ 함수명 기능 ====== ==================================== CBool 논리형(참, 거짓)으로 변환 CByte Byte형(0 ~ 255)으로 변환 CCur 화폐형(Currency)으로 변환 CDate 날짜/시간 형으로 변환 CDbl 배정도 실수형으로 변환 CDec 10진수형으로 변환 CInt 정수(-32,768 ~ 32,767)형으로 변환 CLng 배정도 정수형으로 변환 CSng 단정도 실수형으로 변환 CStr 문자형으로 변환 CVar Variant 형으로 변환 ============================================ |
[VB] FORMAT 함수 사용하기
■ FORMAT 함수를 사용하는 방법을 보여준다. ▶ 표
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 |
──────────────────────────────────────────────────────────── 용도 구분자 기능 사용 예제 결과 ── ────── ─────────────────────── ────────────── ─────────── 숫자 # 숫자의 자리 수를 지정한다. Format(123, "####") 123 무효의 0은 변환하지 않는다. 0 숫자의 자리 수를 지정한다. Format(123, "0000") 0123 무효의 0을 변환한다. % 숫자를 %로 변환한다. Format(23, "##%") 2300% , 세 자리마다 ','의 위치를 지정한다. Format(1234, "#,###") 1,234 . 소수점의 위치를 지정한다. Format(12.34, "##.#") 12.3 +- 숫자의 부호를 지정한다. Format(123, "+###") +123 ── ────── ─────────────────────── ────────────── ─────────── 문자 @ 문자열의 길이를 지정한다. Format("ABC", "@@@@") " ABC" 문자열을 우측으로 정렬한다. & 문자열의 길이를 지정한다. Format("ABC", "&&&&") "ABC" 문자열을 좌측으로 정렬한다. 남는 자리는 무시한다. ! 문자열을 좌측으로 정렬한다. Format("ABC", "!@@@") "ABC " 남는 자리는 무시한다. > 대문자로 치환한다. Format("abc", ">") "ABC" < 소문자로 치환한다. Format("ABC", "<") "abc" \ "\" 다음에 오는 문자를 삽입한다. Format("abcd", "&&\-&&") ab-cd ── ────── ─────────────────────── ────────────── ─────────── 날짜 y 현재까지의 날짜 수 표시 D=#9/20/1999# 263 시각 (1월 1일부터의 날짜 수) Format(D, "y") yy 2자리의 연도 표시 Format(D, "yy-mm-dd") 99-09-20 yyyy 4자리의 연도 표시 Format(D, "yyyymmdd") 19990920 m 1자리의 월 표시 Format(D, "yy-m-d") 99-9-20 mm 2자리의 월 표시 Format(D, "yy/mm/dd") 99/09/20 mmm 'Jan' ~ 'Dec" 표시 Format(D, "yy-mmm") 99-Sep mmmm 'January' ~ 'December' 표시 Format(D, "mmmm") September ooo '1' ~ '12' 표시 Format(D, 'ooo') 9 oooo '1월' ~ '12월' 표시 Format(D, 'oooo') 9월 d 1자리의 날짜 표시 Format(D, 'yy-m-d" 99-9-20 dd 2자리의 날짜 표시 Format(D, "yy-mm-dd") 99-09-20 ddd 'Sun' ~ 'Sat'의 요일 표시 Format(D, "ddd") Mon dddd 'Sunday' ~ 'Saturday'의 요일 Format(D, "dddd") Monday dddddd 시스템에 있는 연,월,일을 자세히 표시 Format(D, "dddddd") 1999년9월16일 월요일 aaa '일' ~ '토'의 요일 표시 Format(D, "aaa" 월 aaaa '일요일' ~ '토요일'의 요일 표시 Format(D, "aaaa") 월요일 h 0~23의 1자리 시 Format(Time, "h:n:s") 9:8:7 hh 0~23의 2자리 시 Format(Time, "hh:nn:ss") 09:08:07 n 1자리의 분 표시 Format(Time, "h:n:s") 9:8:7 nn 2자리의 분 표시 Format(Time, "hh:nn:ss") 09:08:07 s 1자리의 초 표시 Format(Time, "h:n:s") 9:8:7 ss 2자리의 초 표시 Format(Time, "hh:nn:ss") 09:08:07 AM/PM 오전/오후 표시 Format(Time, "AM/PM") AM General Date 날짜와 시간을 시스템 설정 형식으로 표시 Format(D, "General Date") 1999-9-20 오전 9:7:7 Long Date 시스템의 '자세히 표시' 형식에 따라 날짜를 표시 Format(D, "Long Date") 1999년 9월 20일 월요일 Medium Date '중간 표시' 형식에 따라 날짜를 표시 Format(D, "Medium Date") 99년 9월 20일 Short Date '간단히 표시' 형식에 따라 날짜를 표시 Format(D, "Short Date") 1999-9-20 Long Time 시스템의 '자세히 표시' 형식에 따라 시간을 표시 Format(Time, "Long Time") 오전 9:9:7 Medium Time 오전/오후와 함께 시간을 12시간 형식으로 표시 Format(Time, "Medium Time") 오전 09:09 Short Time 24시간 형식으로 시간을 표시 Format(Time, "Short Time") 09:09 ──────────────────────────────────────────────────────────── |
[VB] 날짜/시간 함수 사용하기
■ 날짜/시간 함수 사용하기 ▶ 표
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 |
─────────────────────────────────────── 함수명 기능 사용 예제 결과 ──── ──────────────── ────── ────────── Date 현재의 날짜를 구한다. Date 현재의 날짜 Time 현재의 시간을 구한다. Time 현재의 시각 Now 현재의 날짜와 시각을 구한다. Now 현재의 날짜와 시각 Year Date형의 자료에서 연도를 구한다. Year(Now) 현재의 연도 Month Date형의 자료에서 월을 구한다. Month(Now) 현재의 달 Day Date형의 자료에서 일을 구한다. Day(Now) 현재의 날짜 WeekDay 해당 날짜의 요일을 구한다. WeekDay(Now) 현재의 요일 (숫자로 변환) 일요일 : 1 월요일 : 2 화요일 : 3 수요일 : 4 목요일 : 5 금요일 : 6 토요일 : 7 Hour Date형의 자료에서 시간을 구한다. Hour(Now) 현재의 시간 Minute Date형의 자료에서 분을 구한다. Minute(Now) 현재의 분 Second Date형의 자료에서 초를 구한다. Second(Now) 현재의 초 ─────────────────────────────────────── |
[VB] 수치 함수 사용하기
■ 수치 함수를 사용하는 방법을 보여준다. ▶ 표
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 |
──────────────────────────────────────────── 함수명 기능 사용 예제 결과 ─── ───────────────────── ────────── ─────── Abs 절대값을 구한다. Abs(-5) 5 Sgn 주어진 숫자의 부호를 구한다. Sgn(2.8) 1 (-1 : 음수, 0 : 0, 1 : 양수) Sqr 제곱근을 구한다. Sqr(9) 3 Int 그 수를 초과하지 않는 최대 정수를 구한다. Int(-3.5) -4 Fix 소수 이하를 절삭한다. Fix(-3.5) -3 Exp ex를 구한다. (e≒2.7172...) Exp(3) 20.085536... Log 자연 로그(ln)을 구한다. Log(5) 1.0986122... Sin 사인 값을 구한다. Sin(0.5) .47942553... Cos 코사인 값을 구한다. Cos(0.5) .87758256... Tan 탄젠트 값을 구한다. Tan(0.5) .54630248... Atn 역탄젠트 값을 구한다. Atn9(1) .78539816... LBound 배열의 첫 번째 첨자를 구한다. LBound(strNameArray) UBound 배열의 마지막 첨자를 구한다. UBound(strNameArray) Hex 16진수로 변환한 문자열을 구한다. Hex(255) FF Oct 8진수로 변환한 문자열을 구한다. Oct(255) 377 Rnd 난수를 발생한다. Rnd ──────────────────────────────────────────── |
[VB] 문자열 함수 사용하기
■ 문자열 함수를 사용하는 방법을 보여준다. ▶ 표
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 |
────────────────────────────────────── 함수명 기능 사용 예제 결과 ───── ──────────────── ────────── ──── Acs 아스키 코드를 구한다. Acs("A") 65 Chr 아스키 코드를 문자로 변환한다. Chr(65) "A" Left 문자열의 왼쪽에서 추출한다. Left("abcde", 2) "ab" Mid 문자열의 가운데서 추출한다. Mid("abcde", 2, 1) "b" Right 문자열의 오른쪽에서 추출한다. Right("abcde", 2) "de" Len 문자열의 길이를 구한다. Len("abcde") 5 Instr 지정한 패턴의 위치를 구한다. Instr("abcde", "cd") 3 LTrim 문자열의 왼쪽 공백을 제거한다. LTrim(" abc ") "abc " RTrim 문자열의 오른쪽 공백을 제거한다. RTrim(" abc ") " abc" Trim 문자열의 좌우 공백을 제거한다. Trim(" abc ") "abc" Str 수치를 문자열로 변환한다. Str(1234) "1234" Val 문자열을 수치로 변환한다. Val("1234" 1234 Space 지정한 개수만큼 공백을 생성한다. Space(4) " " String 지정한 개수만큼 문자를 생성한다. String(3, "A") "AAA" UCase 문자열을 대문자로 변환한다. UCase("Korea") "KOREA" LCase 문자열을 소문자로 변환한다. LCase("Korea") "korea" StrReverse 문자열을 역순으로 변환한다. StrReverse("Abc") "cbA" ────────────────────────────────────── |
[VB] 정적 서브 프로시저 사용하기
■ 정적 서브 프로시저를 사용하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 4 5 6 7 8 9 10 11 |
Private Static Sub Accumulate() Dim nAccumulator As Integer nAccumulator = nAccumulator + 10 Print nAccumulator End Sub |
[VB] REDIM PRESERVE 명령문 사용하기
■ REDIM PRESERVE 명령문을 사용하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 |
Redim Preserve strNameArray(10) |
※ 배열 데이터 손실 없이 배열 크기를 변경한다. ※ 다차원
[VB] 다차원 배열 사용하기
■ 다차원 배열을 사용하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 |
Dim strNameArray(2, 3) As String ' 3×4 원소를 갖는 배열을 정의한다. |
[VB] REDIM 명령문 사용하기
■ REDIM 명령문을 사용하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 |
Private m_strNameArray() As String Private Sub CommandButton1_Click() Print "배열 원소 : 6개" ReDim m_strNameArray(5) For I = 0 To 5 m_strNameArray(I) = "원소" & I Print m_strNameArray(I) Next I End Sub Private Sub CommandButton2_Click() Print "배열 원소 : 4개" ReDim m_strNameArray(3) For I = 0 To 3 m_strNameArray(I) = "원소" & I Print m_strNameArray(I) Next I End Sub |
[VB] OPTION BASE 명령문 사용하기
■ OPTION BASE 명령문을 사용하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 |
OPTION BASE 1 ' 배열 하한 인덱스가 0이 아닌 1부터 시작한다. |
[VB] 배열 사용하기
■ 배열을 사용하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 |
Dim strNameArray(9) As String ' Dim strNameArray(0 To 9) As String For I = 0 To UBound(strNameArray, 1) strNameArray(I) = I Print strNameArray(I) Next I [처리 결과] 0 1 2 3 4 5 6 7 8 9 |
※ Dim strNameArray(9) As String은 10개 원소를 갖는 배열을 정의한다.
[VB] ListBox 클래스 : List 속성을 사용해 항목 추가하기
■ ListBox 클래스의 List 속성을 사용해 항목을 추가하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 4 5 |
lbTest.List(0) = "항목#1" lbTest.List(1) = "항목#2" lbTest.List(2) = "항목#3" |
[VB] ListBox 클래스 : Selected 메소드를 사용해 선택 여부 구하기
■ ListBox 클래스의 Selected 메소드를 사용해 선택 여부를 구하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 4 5 6 7 8 9 10 11 |
If lbTest.Selected(1) = True Then MsgBox "두번째 항목이 선택되었습니다." Else MsgBox "두번째 항목이 선택되지 않았습니다." End If |
[VB] LoadPicture 함수 사용하기
■ LoadPicture 함수를 사용하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 |
PictureBox1.Picture = LoadPicture("c:\test.bmp") |
[VB] 콜론(:)을 사용해 한 줄에 여러 개의 문장 사용하기
■ 콜론(:)을 사용해 한 줄에 여러 개의 문장을 사용하는 방법을 보여준다. ▶ 예제 코드 (VB)
|
1 2 3 |
strSource1 = tbSource1!.Text : strSource2 = tbSource2.Text |