| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助] 如何用组合框取日期列的年号作为选择项 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=106730) |
| -- 作者：堕落的后天 -- 发布时间：2017/9/14 17:20:00 -- [求助] 如何用组合框取日期列的年号作为选择项 在做一个表的统计，想要按选择的年份来统计每个人的业绩，在自定义窗口中，插入了一个组合框，怎么对应，让它显示当前表的所有年份（去除重复值） |
| -- 作者：有点甜 -- 发布时间：2017/9/14 17:26:00 --
e.form.controls("ComboBox1").ComboList = DataTables("表C").SQLGetComboListString("year(日期)")
|
| -- 作者：堕落的后天 -- 发布时间：2017/9/14 21:05:00 -- 学习了 ，老师 我写了一段代码 Dim d1,d2 As Date Dim y,z As Integer y = e.Form.Controls("ComboBox2").Text z = e.Form.Controls("ComboBox2").Text + 1 如果y是2017 ，如何让d1为2017第一天 d2为2017最后一天 （简单地说，我输入了一个年号，来检索该年里的所有记录） |
| -- 作者：有点甜 -- 发布时间：2017/9/14 21:13:00 -- Dim d1 As Date = New Date(2017, 1, 1) Dim d2 As Date = d1.AddYears(1) |
| -- 作者：堕落的后天 -- 发布时间：2017/9/14 21:20:00 -- 关键是 d1这个值怎么通过 变量得来 ，不能直接写2017/1/1，是选择获取的 ，比如组合框选择2017 ，怎么赋值给d1 为2017/01/01 明白了 ，把2017改为 “” & y & “”
[此贴子已经被作者于2017/9/14 21:22:27编辑过]
|
| -- 作者：有点甜 -- 发布时间：2017/9/14 21:21:00 -- Dim d1 As Date = New Date(e.Form.Controls("ComboBox2").Text, 1, 1) Dim d2 As Date = d1.AddYears(1) |