시나공

시험에

나오는 것만

공부한다!

문제를 풀긴 풀었는데 다 풀고 보니

제가 프로시저 활용 방법을 잘 몰라서

굳이 쓸데없이 Listindex 함수?를 썼어요

(정답에서는 cmb진료과목.column(0) 이런식으로 썼더라구요..)

결과값은 같아서 채점프로그램에서는 맞는 것으로 나오는데

문제에서 함수를 제시한 것 중에 listindex는 없었어요

그럼 실제 시험에서는  틀린 답으로 처리되는 거죠????????/

Private Sub cmd등록_Click()
   
    입력행 = [b3].Row + [b3].CurrentRegion.Rows.Count
    참조행 = cmb진료과목.ListIndex
       
    Cells(입력행, 2) = txt예약자
    Cells(입력행, 3) = cmb진료과목.List(참조행, 0)
    Cells(입력행, 4) = cmb진료과목.List(참조행, 1)
    Cells(입력행, 5) = CDate(txt진료일)
    Cells(입력행, 6) = Format(txt진료시간, "hh시 mm분")
        
    If Hour(Cells(입력행, 6)) >= 17 Then
        Cells(입력행, 7) = "시간외진료"
        Else
        Cells(입력행, 7) = ""
     End If
End Sub