主题：未将对象应用设置到对象的实例……求解！

If e.DataCol.name = "一级分类" Then
    Dim bh As DataRow = DataTables("取值代码表").find("商品信息表_一级分类 = '" & e.NewValue & "'")
    If bh IsNot Nothing Then
        e.DataRow("编号前缀") = bh("商品信息表_编号前缀")
    End If
    If e.DataRow.isnull("一级分类") Then
        e.DataRow("商品编号") = Nothing
    Else
        Dim lb As String = e.DataRow("编号前缀")
        If e.DataRow("商品编号").StartsWith(lb) = False '如果编号前缀不符
            Dim max As String
            Dim idx As Integer
            max = e.DataTable.Compute("Max(商品编号)","一级分类 = '" & e.DataRow("一级分类")  & "' And [_Identify] <> " & e.DataRow("_Identify") ) '取得该类别的最大编号
            If max > "" Then '如果存在最大编号
                idx = CInt(max.Substring(1,3)) + 1 '获得最大编号的后三位顺序号,并加1
            Else
                idx = 1 '否则顺序号等于1
            End If
            e.DataRow("商品编号") = lb & Format(idx,"000")
        End If
    End If
End If

以上代码报错，报错为

.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2016.3.13.1
错误所在事件：表，商品信息表，DataColChanged
详细错误信息：
调用的目标发生了异常。
无法在 System.Int32 和 System.String 上执行“=”操作。

求助！

以下为问题代码：

If e.DataCol.name = "特殊标记" Or e.DataCol.name = "场次安排" Then
    If e.DataRow("特殊标记") <> "" And e.DataRow("场次安排") = "" Then
        MessageBox.Show(1)
        e.DataRow("小会符合") = "符合"
    ElseIf e.DataRow("特殊标记") <> "" And e.DataRow("场次安排") <> "" Then
        MessageBox.Show(2)
        e.DataRow("小会符合") = "不符合"
    ElseIf e.DataRow("特殊标记") = "" And e.DataRow("场次安排") = "" Then
        MessageBox.Show(3)
        e.DataRow("小会符合") = "不符合"
    ElseIf e.DataRow("特殊标记") = "" And e.DataRow("场次安排") <> "" Then
        MessageBox.Show(4)
        e.DataRow("小会符合") = "不符合"
    End If
End If

当在“特殊标记”列填入内容时，“小会符合”列内容变更为“符合”

然后在“场次安排”列填入内容，按照道理，“小会符合”列应该变更为“不符合” ，可是实际结果依旧为“符合”

我以为是判断式出错，可是当重置“特殊标记”列，“小会符合”列结果又出乎意料的变更为“不符合”

究竟为什么会这个样子？

文本框的格式符号似乎不起作用。

在一个窗口中，我将一个文本框的格式符号设置为 ##0.00

然后预览窗口，在文本框中输入数字70，接着离开文本框，文本框中依旧显示为70，而不是预想中的70.00 ，这该怎么办？