Sub main()

    ''필수 변수 선언
    Dim 인수1, 인수2, i, 버퍼 As Variant
   
    ''핵심 변수 선언
    Dim 결제금액, 예약수량, 예약금액, 합계(1000), 결재금액배열(1000), 예약번호(1000), j, temp, Num As Variant
       
    ''인수 처리
    인수1 = Val(Left(Command, InStr(Command, " ")))
    인수2 = Val(Mid(Command, InStr(Command, " ")))
   
    ''입력 파일 처리
    Open "c:\c_it2\data\abc03.txt" For Input As #1
   
        For i = 1 To 인수2
            Line Input #1, 버퍼
            If i >= 인수1 Then
           
                ''변수 저장
                결제금액 = Val(Mid(버퍼, 48, 10))
                예약수량 = Val(Mid(버퍼, 18, 5))
                예약금액 = Val(Mid(버퍼, 23, 10))
               
                ''배열변수 구하기
                If 결재금액 < 5000000 Then   -> 이부분이 파랗게 반전되어 나와요 ㅠㅠ
                    Num = Num + 1
                    합계(Num) = 예약수량 * 예약금액
                    결재금액배열(Num) = 결재금액
                    예약번호(Num) = Trim(Mid(버퍼, 1, 7))
                                       
                End If
           
            End If
        Next i
       
            ''정렬 (합계 오름차순 or (합계 같음 and 예약번호 오름차순))
            For i = 1 To Num
                For j = i To Num
                    If 합계(i) > 합계(j) Or (합계(i) = 합계(j) And 예약번호(i) > 예약번호(j)) Then
                       
                        temp = 합계(i)
                        합계(i) = 합계(j)
                        합계(j) = temp
                       
                        temp = 결재금액배열(i)
                        결재금액배열(i) = 결재금액배열(j)
                        결재금액배열(j) = temp
                       
                        temp = 예약번호(i)
                        예약번호(i) = 예약번호(j)
                        예약번호(j) = temp
                       
                    End If
                Next j
            Next i
           
    Close #1
   
    ''출력 파일 처리
    Open "c:\c_it2\data\ans2.txt" For Output As #2
        Print #2, 인수1, 인수2, 결재금액배열(Num)
    Close #2
   
End Sub

=========================================================================

34강 abc03.txt 2번문제 코딩한 거구요, 명령줄 인수에 값을 입력하고 실행 버튼을 누르니

변수가 정의되지 않았다고 나오네요. 아무리봐도 결재금액 정의했는데..ㅠㅠ

그리고 입/출력 파일 경로에 C_IT2 는 제가 연습용으로 따로 만든 폴더라 2번이라고

붙인 겁니다. 이건 오류와 상관없는 것 같더라구요.  뭘 정의하지 않은건지 봐주세요~~