VB与ORACLE数据库中的日期转换

　　在数据库的开发过程中，你可能会碰到Oracle与VB的日期类型不匹配，无法直接比较的问题。而VB中又没有专门的函数可以转换ORACLE的日期，这个问题该假如解决呢？其实在ORACLE 的自带函数库里有一个很有用的函数TO_DATE（），它可以将日期字符串按照自己定义的格式转换为ORACLE格式的日期。示例代码如下：

声明：Cn 为数据库链接对象
Dim datBirthday as Date 注释：出生日期
Dim strSql as String 注释：SQL语句
Dim rs as ADODB.Recordset 注释：结果集对象

DatBirthday=# 10/1/1980 #
StrSql = "SELECT NAME FROM TABGROUP_2001" _
&" WHERE BIRTHDAY= TO_DATE(注释："&Cstr(DatBirthday) &"注释：，注释：yyyy-mm-dd注释：)
rs.open strSql

注重函数后面的部分：YYYY-MM-DD，这是你提供的日期字符串的日期格式参数，ORACLE 将根据你的格式参数读取日期（表1中列出经常会用到的参数）。
假如要还原回来怎么办呢？没关系，我们还有另一个函数TO_CHAR(date)，它与To_DATE是一对反函数，使用的格式也与TO_DATE类似，这里也举一个简单的例子，假设我们要查询系统时间，那么格式如下：
SELECT TO_CHAR(SYSDATE,注释：DD-MON-YYYY HH24:MI:SS注释：) "Right Now"
From Dual;
结果显示：
Right Now
―――――――――――――――――――
16－Nov－2001 14：23：22

对照下面的参数表，相信你很快就能够把握这两个函数的应用的
日期格式参数含义说明
D 一周中的星期几
DAY 天的名字，使用空格填充到9个字符
DD 月中的第几天
DDD 年中的第几天
DY 天的简写名
IW ISO标准的年中的第几周
IYYY ISO标准的四位年份
YYYY 四位年份
YYY,YY,Y 年份的最后三位，两位，一位
HH 小时，按12小时计
HH24 小时，按24小时计
MI 分
SS 秒
MM 月
Mon 月份的简写
Month 月份的全名
W 该月的第几个星期
WW 年中的第几个星期