MS的日期控件怎么添加到工程？在什么地方？怎么对日期控件操作？在Access中能直接保存它的变量吗？

Question

MS的日期控件怎么添加到工程？在什么地方？怎么对日期控件操作？在Access中能直接保存它的变量吗？

Answer 1

日期控件包括
DTPicker 控件和monthview控件
包括在微软 windows common controls-2 6.0 sp4 中在保存时格式一下就可以
format(dtp1.value,"yyyy-mm-dd")

Answer 2

打开VB  ALT+P 然后 O
拉动滚动条  大约1/2 处选择
MICROSOFT WINDOWS COMMONCONTROLS-2.60
引入.

Answer 3

能详细说说怎么在Access中读写时间类型的变量和VB中比较时间的方法吗？

Answer 4

dim aa as date
aa=format(dtp1.value,"yyyy-mm-dd")aa就可以作为变量写如数据库了读出来的时候
aa=format(rs!生日,"yyyy-mm-dd")VB中比较时间，常用datediff函数简单使用，判断当前时间和预定时间差别，单位为秒
    Dim aa As Date
    aa = CDate("2003-12-11 17:20:39")
    If DateDiff("n", Now, aa) = 0 Then
        msgbox "时间到啦"
    End If

Answer 5

''怎么在Access中读写时间类型的变量?
'dtp为Dtpicke控件
Dim dtTemp As Date
dtTemp = Format(dtp.Value, "yyyy-MM-dd") '将变量格式化为'2003-12-19'的形式
cn.Execute "insert into table1(日期字段) select #" & dtTemp & "#" '将日期变量写入Access,如果是写入sqlserver将[#]改为[']''怎么在VB中比较时间的方法？
'DateDiff 函数'
'返回 Variant (Long) 的值，表示两个指定日期间的时间间隔数目。
'
'语法
'DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])
'
'DateDiff 函数语法中有下列命名参数:
'
'部分 描述
'interval 必要。字符串表达式，表示用来计算date1 和 date2 的时间差的时间间隔
'Date1□date2 必要；Variant (Date)。计算中要用到的两个日期。
'Firstdayofweek 可选。指定一个星期的第一天的常数。如果未予指定，则以星期日为第一天。
'firstweekofyear 可选。指定一年的第一周的常数。如果未予指定，则以包含 1 月 1 日的星期为第一周。
'
'设置'Interval 参数的设定值如下:
'
'设置   描述
'yyyy   年
'q      季
'm      月
'Y      一年的日数
'd      日
'w      一周的日数
'ww     周
'h      时
'n      分钟
's      秒'如你要比较'2003-12-13'和'2003-12-16'的大小你可以这样：
If DateDiff("d", "2003-12-16", "2003-12-13") < 0 Then MsgBox "2003-12-13小"

Answer 6

日期控件包括
DTPicker 控件和monthview控件
包括在微软 windows common controls-2 6.0 sp4 中

Answer 7

以上问题在MSDN里查一下就能解决！

Answer 8

你要学会怎么用MSDN和csdn的查询
有这方面的例子