명령줄 인수 입력한 후 실행을 눌렀는데

입력한 두 수만 나올때는

어떻게 하나요?

ex)567 667 입력했는데, 결과도 567 667 입니다.

소스는 제 생각에똑같이 입력한 것 같은데...

------------------------------------------------------------------------

Option Explicit

Sub main()
    ''필수 변수 선언
    Dim 인수1, 인수2, i, 버퍼 As Variant
   
    ''핵심 변수 선언
    Dim 제조등급, 매출액, 판매량, 제조포인트, 합계(1000), j, Temp, Num As Variant
   
    ''인수 처리
    인수1 = Val(Left(Command, InStr(Command, " ")))
    인수2 = Val(Mid(Command, InStr(Command, " ")))
   
    ''입력 파일 처리
    Open "c:\c_it\data\abc05.txt" For Input As #1
        For i = 1 To 인수2
            Line Input #1, 버퍼
           
            If i >= 인수1 Then
               
                ''변수 저장
                제조등급 = Trim(Mid(버퍼, 30, 1))
                매출액 = Val(Mid(버퍼, 26, 3))
                판매량 = Val(Mid(버퍼, 15, 3))
                제조포인트 = Val(Mid(버퍼, 20, 3))
               
                If 제조등급 = "c" And 매출액 >= 80 Then
                Num = Num + 1
                합계(Num) = 판매량 + 제조포인트
                End If
            End If
        Next i
   
    ''알고리즘
    For i = 1 To Num
        For j = i To Num
            If 합계(i) < 합계(j) Then
                Temp = 합계(i)
                합계(i) = 합계(j)
                합계(j) = Temp
            End If
        Next j
    Next i
    Close #1
   
    ''출력 파일 처리
    Open "c:\c_it\data\ans1.txt" For Output As #2
        Print #2, 인수1, 인수2, 합계(5)
        Debug.Print 인수1, 인수2, 합계(5)
       
    Close #2
   
End Sub