006. xfnFieldComma

xfnFieldComma 함수

구문

반환값

참고

예제

코드

Private Sub cmdTest_Click()

    'xfnFieldComma 함수 Test

   

    Dim strSQL As String

    Dim strTest1 As String

    Dim strTest2 As String

   

    '쿼리문 작성, 쿼리문 결과에 대해서 단일인용부호를 적용해서 결과값을 가져옴

    strSQL = "select id, name from TestDump"

   

    '단일인용부호(싱글쿼테이션) 사용여부

    strTest1 = xfnFieldComma(strSQL, xenlQuotationMarkNo)

    strTest2 = xfnFieldComma(strSQL, xenlQuotationMarkYes)

   

    Debug.Print "xfnFieldComma(strSQL, xenlQuotationMarkNo) 값은 " & strTest1

    Debug.Print "xfnFieldComma(strSQL, xenlQuotationMarkYes) 값은 " & strTest2

   

   

End Sub