본문 바로가기

Window Programming/VB

Format 함수의 활용

 활용 사례

 Source Coding (활용예)

 List1.AddItem (결과값)

숫자0의 표현 : 형식이 0일경우

 Format(0, "0")

0

숫자0의 표현 : 형식이 #일경우

 Format(0, "#")

 

시스템일자(현재일자)

 Now

2011-07-25 오후 1:53:18

시스템일자(현재일자)

 Date

2011-07-25

시스템시간(현재시간)

 Time

오후 1:53:18

출고일.Value

 dtpDate1.Value

2011-07-25 오후 1:53:16

출고일.DayOfWeek;요일의상수값 일1,월2

 dtpDate1.DayOfWeek

2

시스템일자(현재일자)

 Format(Date, "Long Date")

2011년 7월 25일 월요일

시스템일자(현재일자)

 Format(Time, "Long Time")

오후 1:53:18

시스템일자(현재일자)

 Format(Now, "h▶m▶s")

13▶53▶18

시스템일자(현재일자)

 Format(Now, "hh▶mm▶ss AMPM")

01▶53▶18 오후

 

 #5/27/2011#

2011-05-27 

 

 #5:04:23 PM#

오후 5:04:23

출고일→Long Date

 Format(dtpDate1.Value, "Long Date")

2011년 7월 25일 월요일

출고일→####-##-##

 Format(dtpDate1.Value, "####-##-##")

4-07-50

출고일→yyyymmdd

 Format(dtpDate1.Value, "yyyymmdd")

20110725

출고일→yyyy-mm-dd

 Format(dtpDate1.Value, "yyyy-mm-dd")

2011-07-25

출고일→dddd, mmm d yyyy

 Format(dtpDate1.Value, "dddd, mmm d yyyy")

Monday, Jul 25 2011

 

 Left(dtpDate1.Value, 6)

2011-0

출고일 - 3일 Format(Day(dtpDate1.Value) - 3, "00일")22일
출고일의 월 - 3 Format(Month(dtpDate1.Value) - 3, "00월")04월
출고일의 월 1일 Format(dtpDate1.Value, "yyyy-mm-01")2011-07-01
출고일의 주 시작일 (일→토) Format((dtpDate1.Value - dtpDate1.DayOfWeek + 1), "YYYY-mm-dd")2011-07-24
출고일의 주 마지막일 (일→토) Format((dtpDate1.Value + 7 - dtpDate1.DayOfWeek), "YYYY-mm-dd")2011-07-30
출고일 - 7일 Format((dtpDate1.Value - 7), "YYYY-mm-dd")2011-07-18
출고일이 속한 주차 (년중주차) DateDiff("ww", Format(dtpDate1, "yyyy-01-01"), dtpDate1)30
숫자형식 Format(123, "00000")00123
소숫점 형식 (반올림) Format(1.5 + 0.05, "00.0")01.6
소숫점 형식 (반내림) Format(1.5 + 0.04, "00.0")01.5
소숫점 형식 (반올림 Format(1.5 + 0.05, "##.#")1.6
소숫점 형식 (반내림) Format(1.5 + 0.04, "##.#")1.5
고정자릿수의 표현 Format(Format("12345678", "#,##0"), String(20, "@"))             12,345  678
유형이 지원되지 않으면 문자열을 반환 Format(23)23
  Format(5459.4, "##,##0.00")5,459.40
  Format(334.9, "###0.00")334.90
  Format(5, "0.00%")500.00%
대소문자 표현 Format("This is it", "<")this is it
대소문자 표현  Format("This is it", ">")

THIS IS IT