온라인 채점 결과, 문제4-3번에서 꼬리질문 2,3번이 틀렸다고 나왔습니다. 해설지대로 코드를 입력했는데 왜 틀렸다고 나올까요?
감사합니다.
Private Sub cmd입력_Click()
입력행 = [a5].Row + [a5].CurrentRegion.Rows.Count
Cells(입력행, 1) = lst목록.Column(0)
Cells(입력행, 2) = lst목록.Column(1)
Cells(입력행, 3) = txt수도세.Value
Cells(입력행, 4) = txt전기세.Value
Cells(입력행, 5) = cmb납입.Caption
End Sub
Private Sub UserForm_Click()
End Sub
Private Sub UserForm_Initialize()
lst목록.ColumnCount = 2
lst목록.RowSource = "H3:I6"
chk납입.Value = True
End Sub
빨간색으로 표시된 부분 ist로 작성하셔서 lst 로 변경 하니 정상 실행 되네요.
L 로 입력한 후 확인 해 보세요.
좋은 하루 되세요.
-
관리자2022-02-24 16:48:25
Private Sub cmd입력_Click()
입력행 = [a5].Row + [a5].CurrentRegion.Rows.Count
Cells(입력행, 1) = lst목록.Column(0)
Cells(입력행, 2) = lst목록.Column(1)
Cells(입력행, 3) = txt수도세.Value
Cells(입력행, 4) = txt전기세.Value
Cells(입력행, 5) = cmb납입.Caption
End Sub
Private Sub UserForm_Click()
End Sub
Private Sub UserForm_Initialize()
lst목록.ColumnCount = 2
lst목록.RowSource = "H3:I6"
chk납입.Value = True
End Sub
빨간색으로 표시된 부분 ist로 작성하셔서 lst 로 변경 하니 정상 실행 되네요.
L 로 입력한 후 확인 해 보세요.
좋은 하루 되세요.