Visual Basic CDate 函数

定义和用法

CDate 函数可把一个合法的日期和时间表达式转换为 Date 类型，并返回结果。

提示：请使用 IsDate 函数来判断 date 是否可被转换为日期或时间。

注释：IsDate 函数使用本地设置来检测字符串是否可被转换为日期。

语法

CDate(date)

实例

例子 1

Module Module1
    Sub Main()
     Dim d As String="April 22, 2001"
     if IsDate(d) then
       Console.WriteLine(CDate(d))
     end if
    End Sub
End Module

输出：

2/22/01

例子 2

Module Module1
    Sub Main()
     Dim d As String="#2/22/01#"
     if IsDate(d) then
          Console.WriteLine(CDate(d))
    end if
    End Sub
End Module

输出：

2/22/01

例子 3

Module Module1
    Sub Main()
     Dim d As String="3:18:40 AM"
     if IsDate(d) then
          Console.WriteLine(CDate(d))
    end if
     End Sub
End Module

输出：

3:18:40 AM