- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 不知道怎么说，帮忙看看出了什么问题，看附件 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=26392)
-- 发布时间：2012/12/2 21:50:00
-- 不知道怎么说，帮忙看看出了什么问题，看附件
上传一个例子，不知道怎么说，在窗口里面，在婚假开始和结束那里选择一段日期，点确定，婚假明细就对应有连续的日期。然后点婚假文本框或者其他文本框，婚假明细那里的值就消失了，不知道什么回事？不知
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:婚假自动统计.table |
道是不是代码错了，还是怎么样？麻烦高手看看，谢谢！
-- 发布时间：2012/12/2 22:16:00
--
窗体设计状态下: 文本框 属性 只读 设为 true , 或 false
-- 发布时间：2012/12/2 22:21:00
--
没发现问题啊。
是不是你点击另一行了？
你窗口的文本框是绑定表中的，如果点击另一行了，文本框的值肯定会没有的。
你为何不直接用表事件呢？
如：
Select Case e.DataCol.name
Case "婚假_开始","婚假_结束"
Dim dr As DataRow = e.DataRow
If dr.IsNull("婚假_开始") = False And dr.IsNull("婚假_结束") = False
dr("婚假") = DateDiff("d",dr("婚假_开始"),dr("婚假_结束"))
Dim s As String
For i As Integer = 0 To dr("婚假")
s = s & "," & Format(dr("婚假_开始").AddDays(i),"MM.dd")
Next
dr("婚假明细") = s.Trim(",")
Else
dr("婚假") = Nothing
dr("婚假明细") = Nothing
End If
End Select
-- 发布时间：2012/12/3 14:56:00
--
可以实现了，谢谢你！