以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  [求助]引用  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=194757)

--  作者：苏州老街 --  发布时间：2025/1/10 21:45:00 --  [求助]引用 老师好，项目事件中有和下面相同的一段代码，这段新增的代码不知怎样修改。 Dim filter = iif(t5.filter > "", t5.filter, "1=1") cmd5.CommandText = "SEL  ECT DIS  TINCT year(日期) as 年, 来源,客户ID,客户名称 from {进销存} where " & filter dt = cm  d5.ExecuteReader() For Each dr As DataRow In dt.datarows  filter = "年份 = \'" & dr("年") & "\' and 来源 = \'" & dr("来源") & "\' and 客户名称 = \'" & dr("客户名称")  [此贴子已经被作者于2025/1/11 3:15:32编辑过]