해답에서는 이름의 왼쪽의 첫번째 글자가 txt이름과 같은 행원본을 검색하도록 코드를 작성 해 놓았는데 성이 한글자가 아니기 때문에 txt이름 으로 시작하는 이름을 검색하는 "이름 like txt이름*"을 이용해서 코드를 작성해 봤습니다.
그런데 실행이 올바르게 안되는데 뭐가 잘못된건지 모르겠네요...
Private Sub cmd결합검색_Click()
If IsNull(txt이름) Then
MsgBox "성을 입력하세요"
ElseIf IsNull(cmb부서명) Then
MsgBox "부서명을 선택하세요"
ElseIf IsNull(cmb직위) Then
MsgBox "직위를 선택하세요"
Else
lst사원정보.RowSource = "select * from 사원관리 where 이름 like '" & txt이름 & "'* and 부서명 = '" & cmb부서명 & "' and 직위 = '" & cmb직위 & "'"
End If
End Sub
이렇게 작성하였습니다
안녕하세요.
빨강색으로 표시한 부분을 아래와 같이 수정하세요.
lst사원정보.RowSource = "select * from 사원관리 where 이름 like '" & txt이름 & "*' and 부서명 = '" & cmb부서명 & "' and 직위 = '" & cmb직위 & "'"
즐거운 하루 되세요.
-
*2015-12-16 09:20:28
안녕하세요.
빨강색으로 표시한 부분을 아래와 같이 수정하세요.
lst사원정보.RowSource = "select * from 사원관리 where 이름 like '" & txt이름 & "*' and 부서명 = '" & cmb부서명 & "' and 직위 = '" & cmb직위 & "'"
즐거운 하루 되세요.