기사시험 오후 3번 문제인데여.

제가 코딩한거와 답안 코딩한거랑 비교해 보면 똑같은 거 같습니다.

그런데 정작 결과는 "44" 로 출력됩니다.

지금 계속 확인하고 있는데 어디서 에러가 났는지 안 보입니다. T_T

제가 짠 코딩 내용을 적으면 다음과 같습니다.

Sub main()

''필수 변수 선언
Dim 인수1, 인수2, K, 버퍼 As Variant

''핵심 변수 선언
Dim 거주지코드, 추가운행거리, 운행거리, Num As Variant

''인수 처리
인수1 = Val(Left(Command, InStr(Command, " ")))
인수2 = Val(Mid(Command, InStr(Command, " ")))

''입력 파일 처리
Open "c:\c_it\data\abc0105.txt" For Input As #1

For K = 1 To 인수2
Line Input #1, 버퍼
If K >= 인수1 Then

''변수 저장
거주지코드 = Trim(Mid(버퍼, 18, 1))
운행거리 = Val(Mid(버퍼, 27, 6))

''표처리
Select Case 거주지코드

Case "W"
추가운행거리 = 1135

Case "X"
추가운행거리 = 2325

Case "Y"
추가운행거리 = 3402

Case " Z"
추가운행거리 = 4528

End Select

''건수 구하기
If 운행거리 + 추가운행거리 >= 30000 Then
Num = Num + 1

End If

End If

Next K

Close #1

''출력 파일 처리
Open "c:\c_it\data\ans3.txt" For Output As #2
Print #2, 인수1, 인수2, Num

Close #2

End Sub

어디서 잘못된 거죠.. ㅡㅡ;