3권 부록 173쪽에 문제4 2.②의 두 번째 지시사항에
구매한주를 선택하면 해당 주를 모두 연결하여 포시하시오(Caption 속성 이용).
예: '1주'와 '3주'를 선택하면 '1주3주'로 표시
이 문제 정답이 이렇게 나와있는데요
Private Sub cmd입력_Click()
입력행 = [b4].Row + [b4].CurrentRegion.Rows.Count
Cells(입력행, 2) = Date
Cells(입력행, 3) = txt이름
Cells(입력행, 4) = txt주소
Cells(입력행, 5) = cmb공동체
If chk1주 = True Then
Cells(입력행, 6) = chk1주.Caption
End If
If chk2주 = True Then
Cells(입력행, 6) = Cells(입력행, 6) & chk2주.Caption
End If
If chk3주 = True Then
Cells(입력행, 6) = Cells(입력행, 6) & chk3주.Caption
End If
If chk4주 = True Then
Cells(입력행, 6) = Cells(입력행, 6) & chk4주.Caption
End If
End Sub
if 부분 이해가 안가요 한 줄 한 줄 설명좀 부탁드릴게요ㅠㅠ
If chk1주 = True Then
Cells(입력행, 6) = chk1주.Caption
End If
chk1주 가 선택되었다면(true) cells(입력행,6) 에 chk1주.caption 을 입력하는 것입니다.
If chk2주 = True Then
Cells(입력행, 6) = Cells(입력행, 6) & chk2주.Caption
End If
을 실행하여 chk2주 가 선택되었다면(true) cells(입력행,6)에 Cells(입력행, 6)에 입력된 값에 chk2주.caption 도 붙여서 표시하는 것입니다.
그럼 1주2주 로 표시가 되겠죠.
나머지 if문도 같습니다.
체크 박스 중 1주, 2주 두개를 선택했다면 '1주2주' 이렇게 선택한 개체의 캡션이 모두 표시되어야 합니다. &앞을 다 빼고, chk2주.caption만 입력하면 먼저 입력한 '1주'는 삭제되고 '2주'만 입력됩니다. chk2주 앞에 cells(입력행,6)을 뒤로 넘겨서 chk2주.caption & cells(입력행, 6)로 입력하면 "2주1주"로 순서가 바꿔셔 입력됩니다.
chk2주.caption은 chk2주 컨트롤에 지정된 캡션인 "2주"를 의미합니다.
좋은 하루 되세요.
-
*2015-06-04 06:37:27
If chk1주 = True Then
Cells(입력행, 6) = chk1주.Caption
End If
chk1주 가 선택되었다면(true) cells(입력행,6) 에 chk1주.caption 을 입력하는 것입니다.
If chk2주 = True Then
Cells(입력행, 6) = Cells(입력행, 6) & chk2주.Caption
End If
을 실행하여 chk2주 가 선택되었다면(true) cells(입력행,6)에 Cells(입력행, 6)에 입력된 값에 chk2주.caption 도 붙여서 표시하는 것입니다.
그럼 1주2주 로 표시가 되겠죠.
나머지 if문도 같습니다.
체크 박스 중 1주, 2주 두개를 선택했다면 '1주2주' 이렇게 선택한 개체의 캡션이 모두 표시되어야 합니다. &앞을 다 빼고, chk2주.caption만 입력하면 먼저 입력한 '1주'는 삭제되고 '2주'만 입력됩니다. chk2주 앞에 cells(입력행,6)을 뒤로 넘겨서 chk2주.caption & cells(입력행, 6)로 입력하면 "2주1주"로 순서가 바꿔셔 입력됩니다.
chk2주.caption은 chk2주 컨트롤에 지정된 캡션인 "2주"를 의미합니다.
좋은 하루 되세요.