008. xfnIsControlExist

xfnIsControlExist 함수

구문

반환값

참고

예제

코드

Private Sub cmdTest_Click()

    'xfnIsControlExist 함수 Test

    '폼화면에 EmpID 라는 텍스트상자가 있습니다.

   

    '현재 폼이름을 디버그창에 나타나게 함

    Debug.Print Me.Form.Name

   

    'xfnIsControlExist의 받는 변수가 (Access.Form, 문자열) 에 맞춰 결과값 출력

    Debug.Print xfnIsControlExist(Forms(Me.Form.Name), "EmpID")

   

    '디버그창에는 폼 이름과 현재 컨트롤이 존재하므로 True 값이 출력됨

    'fEmps

    'True

    'xfnIsControlExist의 받는 변수가 (Access.Form, 문자열) 에 맞춰 결과값 출력

    Debug.Print xfnIsControlExist(Forms(Me.Form.Name), "EmpID111111")

   

    '디버그창에는 폼 이름과 현재 컨트롤이 없으므로 False 값이 출력됨

    'False

   

End Sub