2번 문제요...어디가 틀렸는지 가려추 주세요 ^^(페이지 6-27)

 ''필수변수선언
    Dim 인수1, 인수2, 버퍼, i As Variant
   
    ''핵심변수선언
    Dim 상태코드, 액면가, 최대현재가, 현재가, 최소현재가  As Variant
   
    ''인수처리
    인수1 = Val(Left(Command, InStr(Command, " ")))
    인수2 = Val(Mid(Command, InStr(Command, " ")))
   
    ''입력파일처리
    Open "c:\c_it\data\abc12.txt" For Input As #1
        ''최대최소초기화
        최대현재가 = 0
        최소현재가 = 99999999
        For i = 1 To 인수2
            Line Input #1, 버퍼
            If i >= 인수1 Then
           
                ''변수저장
                상태코드 = Trim(Mid(버퍼, 50, 1))
                액면가 = Val(Mid(버퍼, 12, 5))
                현재가 = Val(Mid(버퍼, 6, 6))
               
                ''최소, 최대구하기
                If 상태코드 = "M" And 액면가 >= 5000 Then
                   If 최대현재가 < 현재가 Then
                        최대현재가 = 현재가
                   End If
                  
                   If 최소현재가 < 현재가 Then
                        최소현재가 = 현재가
                   End If
                End If
             
            End If
        Next i
       
    Close #1
    ''출력파일처리
    Open "c:\c_it\data\ans1.txt" For Output As #2
        Print #2, 인수1, 인수2, 최대현재가 - 최소현재가
    Close #2