VB ORACLE 数据查询问题

 

我在VB中执行这段SQL代码：查询是有记录的
dim xmcx as string
xmcx=""
txtSql = "select * from A_table where ADMISSION_DATE_TIME > to_date('" & DTPicker1.Value & "' ,'yyyy-mm-dd') and ADMISSION_DATE_TIME < to_date('" & CDate(DTPicker1.Value) + 1 & "' ,'yyyy-mm-dd') " & xmcx & ""
Set mrc = Nothing
Debug.Print txtSql
Set mrc = ExecuteSQL1(txtSql)
记录数是11条记录，说明上面的语句等是正确的。
但是以下查询记录为0，debug.print 复制到ORACLE查询是有3条记录的
dim xmcx as string
xmcx="李四"
txtSql = "select * from A_table where ADMISSION_DATE_TIME > to_date('" & DTPicker1.Value & "' ,'yyyy-mm-dd') and ADMISSION_DATE_TIME < to_date('" & CDate(DTPicker1.Value) + 1 & "' ,'yyyy-mm-dd') " & xmcx & ""
Set mrc = Nothing
Debug.Print txtSql
Set mrc = ExecuteSQL1(txtSql)
这是为什么？
备注：A_table 为ORACLE视图  视图正常  可以检索数据
谢谢。。。

问题补充：

ORACLE 用的是8i的,另外以上的源码是我临时举得例子,1,2楼朋友考虑很周到,是我在举例子的时候疏忽,但是在真正源码上并非如此,上面的语法结构是正确的, Debug.Print txtSql 的SQL语句绝对正确,我想是不是因为ORACLE 驱动问题 或者什么,我真的很疑惑,谢谢大家的回答,目前仍然没有解决.也就是print出来的语句 直接复制到 ORACLE 中执行 是有数据的  
现在就有个问题  为什么在VB中执行这个句子就没有数据呢,,不报错,查询结果为0  
主要就是这个问题 我现在发现个问题的新突破 就是上面的条件为中文时查询结果为0  英文或者数字查询正确，这个应该怎么解决呢？

 

" & xmcx & "" 这里错了，如果是字符变量要加单引号 '" & xmcx & "'" 

txtSql = "select * from A_table where ADMISSION_DATE_TIME > to_date('" & DTPicker1.Value & "' ,'yyyy-mm-dd') and ADMISSION_DATE_TIME < to_date('" & CDate(DTPicker1.Value) + 1 & "' ,'yyyy-mm-dd') '" & xmcx & "'"

 

谢谢，是驱动问题