Public Function VariantToVBConstExpression( _
    ByVal vValue As Variant _
    ) As String    VariantToVBConstExpression(False) = "False"
    VariantToVBConstExpression(CInt(2)) = "2%"
    VariantToVBConstExpression(CSng(2)) = "2!"
    VariantToVBConstExpression(CByte(2)) = "2%" ' #4
    VariantToVBConstExpression(#4/5/96#) = "#4/5/96#"
    VariantToVBConstExpression("Word") = """Word"""
    VariantToVBConstExpression(Null) = "Null"See also:     VariantToVBEvalExpression Function
    EqualQuotedValue Function
    DoubleQuoteString Function
    CStr Function (Visual Basic)Note: Bytes represented with the Integer type character as in example #4. vValue: The value whose Visual Basic source code representation will be returned. Function generates an error when passed things like object pointers which have no string representation.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.