아래 소스를 보시면.

               
               ''변수 저장
                예약방법코드 = Trim(Mid(버퍼, 36, 2))
                예약일자 = Val(Mid(버퍼, 11, 2))
                누적점수 = Val(Mid(버퍼, 40, 5))
               
                ''표처리
                Select Case 예약방법코드
                    Case "LG"
                        추가사용점수 = 3910
                    Case "TE"
                        추가사용점수 = 2970
                    Case "FA"
                        추가사용점수 = 7930
                    Case "HU"
                        추가사용점수 = 6360
                End Select
               
                ''합계 구하기
                If (예약일자 Mod 2) = 1 Then
                    합계 = 합계 + 누적점수 + 추가사용점수
                End If


예약일자가 8자리 문자형이지만....숫자형으로 2자리만 선언한 이유는..

MM이 홀수달이라는 조건 때문입니다.

두번째 빨간색 부분을 보시면 mod 함수를 이용해서 홀수라는 조건을 처리하고 있습니다.

mod 는 나머지를 구하는 함수므로...그 대상이 숫자이어야 합니다. 그러므로 예약일자를 val 함수로 처리하였구요...

8자리에서 월만...YYYYMMDD 2자리만 필요했던겁니다.

이해가 어려우면 전화주세요. (019-659-5570)