[AccessD] Constant for quote characters?

My preferred choice is a pair of functions called q() and qq(), which accept
a string and return the string encapsulated in either single or double
quotes.

Function q( s As String)
    q = Chr(39) & s & Chr(39)
End Function

Function qq( s a String )
    qq = Chr(34) & s & Chr(34)
End Function

Arthur