以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  动态合成  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=150363)

--  作者：nbsugu_z --  发布时间：2020/5/28 9:12:00 --  动态合成 Dim str1 As String = e.Form.Controls("ComboBox1").Value  \'选年份 Dim str2 As String = e.Form.Controls("ComboBox2").Value  \'选月份 Tables("wy_cpd").Filter = "[yy] = " & str1 & " and [yy1] = " & str2 & "" 老师  combobox1 和2 取自日期表中有年列 和月列 ，年、月 是整数型字段！。上面合成好象不对，请指示

--  作者：y2287958 --  发布时间：2020/5/28 9:37:00 --   Dim str1 As Integer

--  作者：有点蓝 --  发布时间：2020/5/28 9:55:00 --   yy和yy1是什么类型的列？如果也是整数不会有问题，如果是字符型，加上单引号

--  作者：nbsugu_z --  发布时间：2020/5/28 9:58:00 --   Dim str1 As Integer = e.Form.Controls("ComboBox1").Value  \'选年份 Dim str2 As Integer = e.Form.Controls("ComboBox2").Value  \'选月份 Dim str3 As String = e.Form.Controls("ComboBox3").Value  \'选单位 Tables("wy_khb.wy_cpd").Filter = "yy = " & str1 & " and yy1 = " & str2 & " and khbh = "\'& str3 & \'"" khbh是字符型 这样对吗

--  作者：有点蓝 --  发布时间：2020/5/28 10:03:00 --   and khbh = \'" & str3 & "\'"