请教ActiveX控件Microsoft Date and Time如何设置初始值?

itez

Access2003中直接插入自带的ActiveX控件Microsoft Date and Time Picker Control  6.0实现日期选择，现在想设置窗体打开时的初始值，请教各位高手。Access2000文件格式

海狸先生

Private Sub Form_Load()
DTPicker0.Value = Date - Day(Date) + 1
DTPicker2.Value = DateAdd("m", 1, DTPicker0.Value) - 1
End Sub

itez

谢谢海狸先生！