2번 문제 책에 나온 답에는
Private Sub cmd표시_Click()
If Fra확인란 = 1 Then
DoCmd.OpenReport "회원별사용현황", acViewPreview, , "[회원성명]=[forms]![스포츠클럽관리]![lst회원정보]"
Else
DoCmd.OpenReport "강사별사용현황", acViewPreview, , "[강사코드]=[forms]![스포츠클럽관리]![lst강사정보]"
End If
End Sub
======================================================================================
저는 이렇게 풀었습니다.
Private Sub cmd표시_Click()
If Fra확인란 = 1 Then
DoCmd.OpenReport "회원별사용현황", acViewPreview, , "회원성명 = '" & lst회원정보 & "'"
Else
DoCmd.OpenReport "강사별사용현황", acViewPreview, , "강사이름 = '" & lst강사정보 & "'"
End If
End Sub
아래쪽 식으로 사용할 수 없는 이유는
현재 작업중인 폼이나 보고서의 컨트롤이 아니기 때문입니다.
현재 작업중인 보고서는 회원별사용현황 보고서 인데
이 보고서에 있는 lst회원정보로 비교하는 것이 아니기 때문에
lst회원정보 컨트롤이 있는 스포츠클럽관리 폼이라는 경로도 지정해 주셔야 하는 것입니다.
현재 작업중인 폼안에 있는 컨트롤 이었다면 두번째 식으로 가능 하지만
다른 폼이나 보고서라면 경로를 모두 입력해 주시는 것이 좋습니다.
좋은 하루 되세요.
"-
*2012-02-09 08:39:24
아래쪽 식으로 사용할 수 없는 이유는
현재 작업중인 폼이나 보고서의 컨트롤이 아니기 때문입니다.
현재 작업중인 보고서는 회원별사용현황 보고서 인데
이 보고서에 있는 lst회원정보로 비교하는 것이 아니기 때문에
lst회원정보 컨트롤이 있는 스포츠클럽관리 폼이라는 경로도 지정해 주셔야 하는 것입니다.
현재 작업중인 폼안에 있는 컨트롤 이었다면 두번째 식으로 가능 하지만
다른 폼이나 보고서라면 경로를 모두 입력해 주시는 것이 좋습니다.
좋은 하루 되세요.
"