- 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=166167)
-- 发布时间：2021/5/21 13:10:00
-- 按时间统计
问题：在表A中，如何通过窗体的下拉窗选择年度，点按钮将表A的数据按年度写入表B。表A数据说明，ZT列为F，这一行到当前时间一到有效，如表A，第一行bh列的a,zt列为F，说明2019，2020，2021年都有，如表A第二行bh列的b, zt列为T，说明2019年有，（注，lrsj与jcsj的年度一样）2020年没有，如表A第五行，zt列为T，说明2019，2020年有，2021年没
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:统计.foxdb |
有（注，lrsj与jcsj的年度不一样）
-- 发布时间：2021/5/21 14:02:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:统计.zip |
-- 发布时间：2021/5/21 14:12:00
-- 回复：（有点蓝）[upload=zip,统计.zip]viewFile.asp?...
出错：
从字符串“2019”到类型“Date”的转换无效。
-- 发布时间：2021/5/21 14:17:00
--
Dim d As Date = KK.Value
Dim d1 As Date = new Date(d.Year,1,1)
改为
Dim d As Date
Dim d1 As Date = new Date(cint(KK.Value),1,1)
-- 发布时间：2021/5/21 14:41:00
-- 回复：（有点蓝）Dim d As Date = KK.ValueDim d1 As ...
改了后，如选择的是2019年的，2020年及2021年的数据都出来了
-- 发布时间：2021/5/21 14:44:00
--
看懂代码，自己改改条件