未绑定的文本框默认值如何用VB修改?

LJB

在论坛中搜索了一天,找到了一个跟我类似的问题,但却没有回复,和正面回复,我的意思是这样子的.
如果我想让系统在指定的日期到达后就不能再使用了(相当于注册到期一样),如果将资料存于表中调用,DLOOKUP就可以实现,但是这样没有安全可言(当然,ACCESS没有决对安全的).
将Shift禁用,将DMB转换为MDE,将小库设密码(相对安全了些).
所以,我想在启动窗体中增加一个未绑定值的文本框并设默认值为一个日期(2010.07.12),输入一此参数值后可以将此默认值改为如(2011.1.1).
一句话概括:如题!

咱家是猫

Me.Diaoqirq.DefaultValue = "=#2011-1-1#"
或
Me.Diaoqirq.DefaultValue = "='2011-1-1'"

Benjamin_luk

感觉LZ在使用所谓的会计年份
一些公司常常以下半年为新一年的开始,就是当前日期+6个月.
按LZ的要求, 判断所输入的日期是在新的一年或旧的年份.
所以LZ可以自己写个函数, 将当前日期+6个月, 如果>12就是新年开始, 当前年份+1
否则就用当前年份