以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  下拉窗口值得获取  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97883)
--  作者：aidimeng
--  发布时间：2017/3/20 15:14:00
--  下拉窗口值得获取

在窗口A中 添加一个表，点击表中某字段 可以显示 下拉窗口。 下拉窗口中只有一个控件Calendar，

 怎么样 将下拉窗口中的 Calendar 的value 赋值给 表中对应的字段啊

 

Calendar的DateSelected 事件是这样写的，没反应

Dim r As Row = Tables("领料过滤_table1").Current
Dim ca As WinForm.Calendar = e.Form.Controls("Calendar1")
Dim d As Date=Format(ca.value,"yyyy-MM-dd")
   r("值") =d

e.Form.Close

[此贴子已经被作者于2017/3/20 15:35:11编辑过]
--  作者：有点色
--  发布时间：2017/3/20 15:51:00
--  

改成

 

e.Form.DropDownBox.Value = ca.Value