VB+Access系統問題解答解决方案

VB+Access系統問題解答
問題：1.DTPicker控件設置為空；

VB code

'窗体截入时DTPicker1不显示时间     Private   Sub   Form_Load()             DTPicker1.Format   =   dtpCustom             DTPicker1.CustomFormat   =   "   "     End   Sub         '用户选择时DTPicker1显示时间     Private   Sub   DTPicker1_Change()             DTPicker1.Format   =   dtpLongDate     End   Sub         '双击清除DTPicker1中显示的时间     Private   Sub   DTPicker1_DblClick()             DTPicker1.Format   =   dtpCustom             DTPicker1.CustomFormat   =   "   "     End   Sub   

VB code

 Private   Sub   Form_Load()             DTPicker1.Value =Format(now, "yyyy-MM-dd HH:mm:ss")  End   Sub