格式化字符函數

原创 2006年06月19日 20:44:00

原始位置﹕http://dev.csdn.net/author/fanpingli/1742be883708457999b0ad569b82c878.html

Function Q(ByVal SqlVariable As Variant) As String
'-----------------------------------------
'        Notes: Useful in creating properly formatted SQL statements
'        Usage: sql="select * from table where name= " & Q(vntName)
'        ??版本格式化适用于Access的?量,若支持其它?据?或?需要?其?行修改
'-----------------------------------------

On Error GoTo ErrTrap
Q = SqlVariable
'format the string
    Select Case VarType(SqlVariable)
        Case vbNull, vbEmpty
                Q = "NULL"
                Case vbString
                Q = "'" & Replace(SqlVariable, "'", "''") & "'"
                'date variable
        Case vbDate
            'format and enclose in pounds signs for Access
            Q = "'" & Format$(SqlVariable, "general date") & "'"
            'otherwise treat as numeric
        Case Else
            On Error Resume Next
            Q = CStr(SqlVariable)
            If Err.Number <> 0 Then Q = SqlVariable
    End Select
    Exit Function

ErrTrap:
 On Error GoTo 0
End Function

版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

字符设备 register_chrdev_region()、alloc_chrdev_region() 和 register_chrdev()函数的区别

内核中所有已分配的字符设备编号都记录在一个名为 chrdevs 散列表里。该散列表中的每一个元素是一个 char_device_struct 结构,它的定义如下:    static struc...

字符分割函数

  • 2015-11-05 22:09
  • 383B
  • 下载

Linux 字符设备驱动开发基础(三)—— read()、write() 相关函数解析

我们在前面讲到了file_operations,其是一个函数指针的集合,用于存放我们定义的用于操作设备的函数的指针,如果我们不定义,它默认保留为NULL。其中有最重要的几个函数,分别是open()、r...

oracle常用字符函数

  • 2013-03-19 15:46
  • 22KB
  • 下载

提取数字、提取英文、提取中文、过滤重复字符等SQL函数(含判断字段值是否有中文)

--SQL 判断字段值是否有中文   create  function  fun_getCN(@str  nvarchar(4000))     &#...

去掉相同字符的SQL函数.

  • 2010-04-19 10:36
  • 11KB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)