表达式问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师,请帮我看下这个代码:我要计算截止到3月(1月-3月)的营业收入,月份的表达式结果结算不正确

Dim cb As WinForm.ComboBox = Forms("会计科目主窗口").Controls("ComboBox1") 比如我输入2018年3月

If cb.text > "" Then

Dim dt As DataTable = DataTables("凭证明细")

Dim tb As Table = Tables("利润表")

Dim d As Date = cdate(cb.Text)

tb(0,3) = dt.Compute("sum(贷方金额)","一级码 = '5101'and 年份 = '"& d.Year & "'and 月份 <= '"& d.Month & "' ") '营业收入

主题：表达式问题