你表达的不太清楚。
如果你使用了数据库,打开数据库,打开表,选择修改,选择日期型的字段,在字段有效性栏目中,有一个默认值文本框,输入:DATE()即可。
如果你没有使用数据库,而是使用的自由表,就不能使用默认值,但是在表单中,可以将其定义为系统日期,比如文本框text3是放置日期字段的,在表单Activate事件中,加入命令:
Thisform.Text3.value=date()
首先表必须是数据库中的表,操作方法是打开这个表,执行命令modi stru,在表设计器中选择所需要设置的那个日期时间型字段,在下面的默认值中输入datetime()
也可以用命令来完成。
alter table 表名 alter 字段名 D(default datetime())
DATETIME()函数
返回当前日期和时间作为日期时间值,或创建一个2000年兼容的日期时间值。
DATETIME()函数示例
第一个例子存储日期时间为新年到名为tNewyear变量,并存储当前日期时间为一个名为tToday变量。然后显示当前日期时间和新年之间的秒数。
第二个示例使用DATETIME()来创建一个2000年兼容的日期时间值。
tNewyear = DATETIME(YEAR(DATE( ) ) + 1, 1, 1) && Next New Year
tToday = DATETIME( )
nSecondstonewyear = tNewyear - tToday
CLEAR
? "There are " + ALLTRIM (STR(nSecondstonewyear)) ;
+ " seconds to the next New Year."
CLEAR
SET CENTURY ON
SET DATE TO AMERICAN
? DATETIME(1998, 02, 16, 12, 34, 56) && Displays 02/16/1998 12:34:56 PM
ctod(date())