主题：错误提示

请问如下提示是什么意思：
此主题相关图片如下：未命名.gif


此主题相关图片如下：未命名1.gif

字符数据和整数数据不能比较，例如 1<> "2" 这样的比较不行，必须 1 <> 2

是不是下面代码错误：

Dim Sum As Double = Tables("生产工序").Compute("Sum(工艺工时_天数)","[图号] = '" & dr("图号") & "' And [派工单号] = '" & dr("派工单号") & "' And [状态]= '执行'  And [工序_序号] <= " & dr("工序_序号"))
Dim Sum1 As Double = Tables("生产工序").Compute("Sum(工艺工时_天数)","[图号] = '" & dr("图号") & "' And [派工单号] = '" & dr("派工单号") & "' And [状态]= '执行' And [工序_序号] >= " & dr("工序_序号"))

改成如下行吗？（工序_序号列是字符型列）
Dim Sum As Double = Tables("生产工序").Compute("Sum(工艺工时_天数)","[图号] = '" & dr("图号") & "' And [派工单号] = '" & dr("派工单号") & "' And [状态]= '执行'  And [工序_序号] <= '" & dr("工序_序号")& "'")
 Dim Sum1 As Double = Tables("生产工序").Compute("Sum(工艺工时_天数)","[图号] = '" & dr("图号") & "' And [派工单号] = '" & dr("派工单号") & "' And [状态]= '执行' And [工序_序号] >= '" & dr("工序_序号")& "'")

在比较的时候，不是什么都要加单引号的，字符用单引号，日期用#，数值什么也不要。

你需要抽出时间，重读一下帮助，巩固一下基础。

工序_序号列如果是字符型，你就不应该用大于等于做比较。

我已把数据类型改成数值型了，我再试试看，谢谢

大概是这样吧。

 

Dim Filter As String = "[图号] = '" & dr("图号") & "' And [派工单号] = '" & dr("派工单号") & "' And [状态]= '执行'"
Dim Sum As Double = Tables("生产工序").Compute("Sum(工艺工时_天数)",Filter & " And [工序_序号] <= " & dr("工序_序号"))
Dim Sum1 As Double = Tables("生产工序").Compute("Sum(工艺工时_天数)",Filter & " And [工序_序号] >= " & dr("工序_序号"))