我定义了两个integer变量，分别赋值为查询结果的两个ID，具体赋值过程为：

Dim dsDelete As DataSet = New DataSet()
Dim dtDelete As DataTable = New DataTable()
Dim strDelete As String = "select ID from 库存统计表 where 货物SN ='" & dr("货物SN") & "'"
dsDelete = c.Query(strDelete)
c.cn.Close()
If Not dsDelete Is Nothing And dsDelete.Tables(0).Rows.Count > 0 Then
dtDelete = dsDelete.Tables(0)
Dim IDdelete As Integer = Val(dtDelete.Rows(0)(0).ToString())

Dim IDnext As Integer
Dim dsnext As DataSet = New DataSet()
Dim dtnext As DataTable = New DataTable()
Dim strnext As String = "select top 1 ID from 库存统计表 where ID>" & IDdelete & " and 货物编号='" & dr("货物编号") & "'"
dsnext = c.Query(strnext)
c.cn.Close()
If Not dsnext Is Nothing And dsnext.Tables(0).Rows.Count > 0 Then
dtnext = dsnext.Tables(0)
IDnext = Val(dtnext.Rows(0)(0).ToString())

然后想把IDnext的值赋值给IDdelete,我这样写：IDdelete = IDnext

然后在运行的时候就出错了，错误提示是‘=’附近有语法错误

请哪位大侠给指正下呗？