vb ado对象 sql 语句中 日期时间类字段的查询

rs.open "select * from 表 where 日期（字段名）=系统的今天的日期（不含时刻）"
rs.open "select * from 表 where 时间（字段名）=系统的当前时刻减十五分钟"
这个两个语句应该怎样表达才算正确？

rs.open "select * from 表 where 日期（字段名）=系统的今天的日期（不含时刻）"：
rs.open "select * from 表 where 日期='" & Date & "'"

rs.open "select * from 表 where 时间（字段名）=系统的当前时刻减十五分钟"：
“系统的当前时刻减十五分钟”定义三个变量，分别存储小时、分钟、秒数，在Time函数中，取出它们，在分钟中减去15，在判断分钟变量是否小于0，如果小于0，必须配置小时变量，最后生成新的时间，比如XTine
rs.open "select * from 表 where 时间='" & XTine & "'"

注意：在Access数据库上面的语句可能有问题。

txtsql =语句是常量字符串和变量字符串相加。 模式应该是这样的：常量字符串"insert into 职工基本信息 values("+ 双引号+变量1+双引号+逗号+双引号+变量2+双引号+逗号....+双引号+变量n+双引号+")" 注意，文本字段前后加双引号 简单起见，假设只有三个字段： txtsql = "insert into 职工基本信息 values(" 文本类型 & """&trim(name.text) &"""& "," & trim(age.text) & "," 数值类型 & """&trim(address.text) &""" &")" 最后括号 最好每个字段都分行，这样不容易写错。