-모의고사 4회 3번문제 소스코딩 이렇게 했는데요

Sub main()
''''필변
Dim 인수1, 인수2, 버퍼, k As Variant
''''핵변*
Dim 일련번호, 예약수량, 예약금액, 합계, 최소값 As Variant
''''인수처리
인수1 = Val(Left(Command, InStr(Command, " ")))
인수2 = Val(Mid(Command, InStr(Command, " ")))
''''입력파일처리
Open "C:\C_it\data\abc04.txt" For Input As #1
''''최소값 초기화
최소값 = 999999999
For k = 1 To 인수2
Line Input #1, 버퍼
If k >= 인수1 Then
''''변수저장
일련번호 = Trim(Mid(버퍼, 1, 7))
예약수량 = Val(Mid(버퍼, 18, 5))
예약금액 = Val(Mid(버퍼, 23, 10))
''''최소값구하기
If 일련번호 Mod 2 = 1 Then
 If 최소값 > 예약수량 * 예약금액 Then
  최소값 = 예약수량 * 예약금액
  End If
  End If
   End If
   Next k
 
Close #1
''''출력파일
Open "C:\C_it\data\ans3.txt" For Output As #2
Print #2, 인수1, 인수2, 최소값
End Sub

If 일련번호 Mod 2 = 1 이 부분이 지정되고 "13번런타임오류가발생했습니다.형식이맞지않습니다"이런 오류가 나옵니다. 뭘 잘못한건가요?
낼아침시험입니다..빠른답변부탁드려요..