4번 문제:담임코드가 A,B인 자료에 대해 (영어점수+점수포인트) 값이 50이상인 자료의 건수를 출력하시오.

Sub Main()

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

''핵심변수선언
Dim 지역코드, 점수포인트, 담임코드, 영어점수, Num As Variant

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

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

    For i = 1 To 인수2
        Line Input #1, 버퍼
        If i >= 인수1 Then
       
            ''변수저장
            지역코드 = Trim(Mid(버퍼, 31, 1))
            영어점수 = Val(Mid(버퍼, 14, 3))
            담임코드 = Trim(Mid(버퍼, 29, 1))
           
            ''표처리
            Select Case 지역코드
                Case "A"
                점수포인트 = 10
                Case "B"
                점수포인트 = 15
                Case "C"
                점수포인트 = 20
               
            End Select
           
            ''건수
            If 담임코드 = "A" And 담임코드 = "B" And (영어점수 + 점수포인트) >= 50 Then
                Num = Num + 1
           
            End If
        End If
    Next i
   
Close #1

''출력파일처리
Open "C:\c_it\data\ans4.txt" For Output As #2
    Print #2, 인수1, 인수2, Num
Close #2
End Sub

**건수 구할때 and를 or로 고쳐도 답이 안 나와요. 어디가 틀렸는지 알려주세요~!!

감사합니당^^