|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
- MS-Word 버전(95,97,2000,xp,2003,2007):
* 아래줄에 질문을 작성하세요 >>
체크된것을 양식식권을 누르면
식권 이라는 곳에 뿌려져야합니다.
양식식권을 누르면 종류에는 "양식" 이라고 뜨고
오늘날짜 Label4에는 현재 데이터 날짜를 0000년 00월 00일 0요일 이라고 입력되고
메뉴에는 양식에서 클릭햇던 메뉴들이 입력되고
금액은 체크한 메뉴들의 값이 합계가되어서
나옵니다 7개를 클릭하고 양식식권을 누르면
7개의 해당되는 메뉴들의 값이 합계로 나와야됩니다
제가 코드는
Private Sub CommandButton22_Click()
If CheckBox31 = True Then c = c + 1
If CheckBox32 = True Then c = c + 1
If CheckBox33 = True Then c = c + 1
If CheckBox34 = True Then c = c + 1
If CheckBox35 = True Then c = c + 1
If CheckBox36 = True Then c = c + 1
If CheckBox37 = True Then c = c + 1
If CheckBox38 = True Then c = c + 1
If CheckBox39 = True Then c = c + 1
If CheckBox40 = True Then c = c + 1
If CheckBox41 = True Then c = c + 1
If CheckBox42 = True Then c = c + 1
If CheckBox43 = True Then c = c + 1
If CheckBox44 = True Then c = c + 1
If CheckBox45 = True Then c = c + 1
If c > 7 Then MsgBox "메뉴는 최고 7개까지 선택가능합니다.", vbCritical, "선택요망"
End Sub
이렇게 썻습니다.
여기서 소스를 더추가하면 될거같은데
어떻게 넣어야될까요 ?
|
|