求助:如何使用"日历"?

毒舌

大家好,问一下,如何通过点击日历上面的天数来输入日期啊?

这里的范例我看了,但是没看明白~~能不能请说一下具体的操作步骤啊?顺便说一下代码~~谢谢~

毒舌

Private Sub StarDate_LostFocus()
DoCmd.OpenForm "日历"
End Sub

Private Sub 日历_Click()
DoCmd.GoToControl "StarDate"
DoCmd.GoToControl "endDate"
StarDate_LostFocus

End Sub


这个是

msf

1. <SCRIPT language=javascript type=text/javascript>
   document.write (astro(''));
   </script>

复制代码

头衔：菜鸟

等级：Office游民

文章：188

积分：396

门派：无门无派

注册：2003年10月9日

http://bbs.office-cn.net/viewFile.asp?BoardID=2&ID=16270

调用日历的例子~里面红色的代码是什么意思,干吗用的啊?如果向我上传的文件那样,想只是单纯的输入日期,代码该怎么写啊?



谢谢

sgrshh29

以下是引用毒舌在2006-10-12 22:47:00的发言：调用日历的例子~里面红色的代码是什么意思,干吗用的啊?如果向我上传的文件那样,想只是单纯的输入日期,代码该怎么写啊?

他那个代码与你无关.你上传的文件只要这样写代码就可以了(在日历那个窗体)

Private Sub Calendar0_DblClick()
Forms("表1").Controls("日期") = Me.Calendar0
DoCmd.Close acForm, Me.Name
End Sub

Private Sub Form_Load()
Me.Calendar0 = Date
End Sub

毒舌

十分感谢

蓝天8390

很好用!

aryam

出现编译错误

tianshanet

~~谢谢~

tianshanet

对了，但是怎么绑定到表上呢

tianshanet

有没有人在？

cybersingle

真是多谢