以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于日历  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=75006)

--  作者:fred
--  发布时间:2015/9/24 13:02:00
--  [求助]关于日历
如下图日历

图片点击可在新窗口打开查看此主题相关图片如下:calendar.jpg
图片点击可在新窗口打开查看
目的:当点日历中的某一天(〉=今天)时,点中的日期在下面DateTimePicker里出现。而下面DateTimePicker又是绑定到一个表的“计划对象日”字段。当点右边保存按钮时,将此值保存到绑定表的“计划对象日”字段中。

于是,我在Calendar的Click事件中这样写
Dim CA As WinForm.Calendar = e.Form.Controls("Calendar1")
Dim TX As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")
TXT.Value = CAL.Value
但不能实现上述目的。一点反应没有。是不是代码写错了?
[此贴子已经被作者于2015/9/24 15:26:58编辑过]

--  作者:fred
--  发布时间:2015/9/24 14:58:00
--  
哈罗,有老师在吗?
--  作者:fred
--  发布时间:2015/9/24 15:28:00
--  
HELLO
--  作者:Hyphen
--  发布时间:2015/9/24 15:30:00
--  

使用DateSelected事件

 


--  作者:大红袍
--  发布时间:2015/9/24 15:33:00
--  

这样写

 

Dim CA As WinForm.Calendar = e.Form.Controls("Calendar1")
Tables("表A").Current("第一列") = CAL.Value
 
 

--  作者:fred
--  发布时间:2015/9/24 15:57:00
--  
谢谢。既然没有CLICK,那就把CLICK在事件中去掉不是更好?