시나공

시험에

나오는 것만

공부한다!

문제 2의 1번에서 문제에 제시된 것은 with, additem을 이용하여 작성하는 것이었지만 앞에서 배운 내용(226쪽의 기본문제의 4번)을 응용해보고 싶어서

Private Sub UserForm_Initialize()

cmb결재형태.AddItem "현금"

cmb결재형태.AddItem "카드"

cmb결재형태.AddItem "어음"

=> cmb결재형태.List =Array("현금", "카드", "어음") 이런 식으로 간단히 쓸 수 있다고 되어 있어요

End Sub

이것처럼

문제 2번에서

Private Sub UserForm_Initialize()

With cmd조회구분

.AddItem "관리자"

.AddItem "일반사용자"

.AddItem "고객"

End With

대신에 그 부분을

With cmd조회구분.List = array("관리자", "일반사용자", "고객")

End With 로 해보았는데요 디버그 하라고 하더라구요 ㅠㅠ

제약조건이 없을 때 with 문에서 저렇게 간단히 쓸 수 있는 방법이 없는 것인가요?