- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]窗体中textbox控件的问题 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=106636)
-- 发布时间：2017/9/13 2:14:00
-- [求助]窗体中textbox控件的问题
此主题相关图片如下：qq图片20170913010654.png
我在上图的这个窗体中设置“出货月份”的值是根据“开始时间”的值来改变的，
我在选择“开始日期”的时候，“出货月份”的值会跟着改变，
但是当我的鼠标焦点离开“开始日期”这个控件后，“出货月份”里面的值也消失了。。。
我尝试过可以手工在“出货月份”里面输入值，焦点离开该控件后里面的值也不会消失。
我是在“开始日期”的控件写了以下代码
此主题相关图片如下：qq图片20170913011307.png
请帮看看是哪里出了问题？
-- 发布时间：2017/9/13 8:35:00
--
你的控件是不是绑定某列数据？
如果绑定了，就要取表中绑定列的数据，而不能直接取控件的值
-- 发布时间：2017/9/13 8:44:00
--
最后加上writeValue
e.Form.Controls("xxx").writeValue
-- 发布时间：2017/9/13 9:22:00
-- 回复：（10059）你的控件是不是绑定某列数据？如果绑定...
是的，是做的绑定，但是手工可以输入。
-- 发布时间：2017/9/13 9:22:00
-- 回复：（有点甜）最后加上writeValue e.Form...
好了，谢谢~
-- 发布时间：2017/9/26 23:28:00
-- 回复：（有点甜）最后加上writeValue e.Form...
老师，遇到一个奇怪的问题
这个窗口我删掉了重新做了一个，还是写的这些代码，
此主题相关图片如下：1.png
Dim strShipMonth As String
strShipMonth = Format(e.Form.Controls("dtpStartDate").Value,"yyyy年MM月份")
e.Form.Controls("txtShipMonth").Value = strShipMonth
e.Form.Controls("txtShipMonth").writeValue
但是运行报错
此主题相关图片如下：2.png
进去之后，开始日期那个控件里面怎么选择都是显示第一次选择的日期，之后再怎么选择也是不会变
但是出货月份的控件值还是会跟着改变
此主题相关图片如下：3.png
如果我把e.Form.Controls("txtShipMonth").writeValue这句代码注释掉，不会报错，
但是会跟1楼的问题一样。
麻烦帮我看看哪里出了问题？
-- 发布时间：2017/9/26 23:31:00
--
参考http://www.foxtable.com/webhelp/scr/2436.htm
直接操作表格的值
-- 发布时间：2017/9/26 23:57:00
-- 回复：（有点蓝）参考http://www.foxtable.com/webhel...
Dim strShipMonth As String
strShipMonth = Format(e.Form.Controls("dtpStartDate").Value,"yyyy年MM月份")
\'e.Form.Controls("txtShipMonth").Value = strShipMonth
\'e.Form.Controls("txtShipMonth").writeValue
Tables("TabMonthShip").Current("ShipMonth") = strShipMonth
黄色标记的是文本款对应的表格“出货月份”
我将代码改成这样，没有报错，选择开始日期时同时也能改变文本款的值，
但是选择开始日期时，比如我想把2017-08-01改到2017-06-01
我选择这个日期后，开始日期的值是不变的，还是显示2017-08-01，当我第二次再次选择2017-06-01时，
开始日期控件的值才会变成2017-06-01，这是什么问题？？
[此贴子已经被作者于2017/9/26 23:58:32编辑过]
-- 发布时间：2017/9/27 9:36:00
--
这个代码不应该有问题
e.Form.Controls("txtShipMonth").writeValue
你单独做一个例子发上来看看具体的情况