1. Filter : 어떤 자료가 들어있는 1차원 문자열 배열에서
               특정문자의 부분집합을 배열로 되돌려 줍니다.
     
     Dim astrData() As String
     Dim astrData2() As String
     Dim i As Integer
     ReDim astrData(1 To 10) As String
     astrData(1) = "001007"
     astrData(2) = "002"
     astrData(3) = "003"
     astrData(4) = "004"
     astrData(5) = "005"
     astrData(6) = "006"
     astrData(7) = "007"
     astrData(8) = "008"
     astrData(9) = "009"
     astrData(10) = "010"
 
     ' True이면 "007"이 들어있는 첨자만 배열로 생성하고,
     ' False이면 "007"이 들어있지 않은 첨자만 배열로 생성함
     astrData2() = Filter(astrData(), "007", True)
     ' "001007", "007" 2개의 값을 가진 배열이 생성됨
     For i = 0 To UBound(astrData2()) 
         Print astrData2(i)  
     Next i
 
   2. InStrRev : InStr과 같은 기능을 하지만, 다른점은 뒤에서부터
                 문자열 위치를 찾습니다.                
                 (주의사항 : InStr과 사용방법이 틀립니다.)
     
     Dim strData As String
     strData = "001 002 003 001 002 004 001"
     Print InStrRev(strData, "001")  ' 25가 화면에 출력됨
 
   3. Join : 1차원 문자열 배열을 특정문자를 포함해서
             하나의 스트링으로 만듭니다.
 
     Dim strData As String
     Dim astrData() As String
     ReDim astrData(1 To 10) As String
     astrData(1) = "001007"
     astrData(2) = "002"
     astrData(3) = "003"
     astrData(4) = "004"
     astrData(5) = "005"
     astrData(6) = "006"
     astrData(7) = "007"
     astrData(8) = "008"
     astrData(9) = "009"
     astrData(10) = "010"
     strData = Join(astrData(), " ")
     Print strData
 
     ' " "(공백문자)를 포함한 스트링을 만듭니다.
     ' 결과 : "001007 002 003 004 005 006 007 008 009 010 "
 
 
   4. MonthName : 월을 인자로 주면 월을 반환합니다...?
                  아래 예제를 보면 정말 황당한 생각이 드실겁니다.
                  그런데, 저의 생각으로는 영어권에서는 꼭 그렇지도
                  않을 것이라고 느껴집니다.
                  영어권에서는 첫번째 예제의 결과값으로 'Nov'
                  두번째 예제의 결과값으로 'November' 을 리턴
                  할 것이라고 생각합니다....^^
                  아무튼 황당한 함수...
  
      Print MonthName(11, False) ' 결과 : 11
      Print MonthName(11, True)  ' 결과 : 11월
 
   5. Replace : 문자열 치환함수
 
      Print Replace("001 002", "00", "////")
      --> ////1 ////2
 
   6. Round : 반올림함수
 
      Print Round(10.16, 1)
      --> 10.2 
      * 주의사항 : 다 아시죠.. 반올림이 제대로 안된다는거..
 
   7. Split : 스트링을 특정문자열로 분리해서 1차원 배열을 생성시킴
      
      Dim astrData() As String
      astrData() = Split("001/002/003/004/005", "/")             
 
      --> 5개의 첨자를 가진 1차원배열이 생깁니다.
          astrData(0) = "001"
          astrData(1) = "002"
          astrData(2) = "003"
          astrData(3) = "004"
          astrData(4) = "005"
 
   8. StrReverse : 글자를 반대로 만들어줌 
 
      Print StrReverse("123456789")
      
      --> 987654321