''''필수변수선언
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\abc0001.txt" For Input As #1
 
    For i = 1 To 인수2
        Line Input #1, 버퍼
        If i >= 인수1 Then
       
         ''''변수저장
         국어점수 = Val(Mid(버퍼, 11, 3))
         영어점수 = Val(Mid(버퍼, 14, 3))
         학번 = Val(Mid(버퍼, 1, 6))
        
         If (최대값 < 국어점수 + 영어점수) Or _
         (최대값 = 국어점수 + 영어점수 And 최소학번 > 학번) Then
         최대값 = 국어점수 + 영어점수
         최소학번 = 학번
         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

End Sub


선생님 강의 정렬전까지 듣고 성적관리 똑같이 따라해보고 있는데 자꾸 오류가 나네요

왜 그런지 알려주세요 ~~ 문제 연습해봐야하는데 이게 안풀리니깐

시간만가고 .... --;; 막히네요 ~~ 답볕부탁드려요