Dim sx2 As WinForm.ComboBox = e.Form.Controls("筛选2")
Dim 筛选项目求和 As Double = 0
sx2.ComboList = ("缴医保|缴失保|缴养老|缴救助")
筛选项目求和 = Tables("教职工信息表").Compute("sum(缴医保)", filter)
如果把“缴医保”换一下,写成下列格式:
筛选项目求和 = Tables("教职工信息表").Compute("sum(sx2.text)", filter) 就出错了,请专家指导一下写法
(当列名称有双引号时 可以用 sx2.text 来替代,但这里没有双引号)