主题：编号

此主题相关图片如下：111.png

这个编号是 08，可是修改成功后，这个编号就改变了，变成最大号加 1后的那个号码，我这我不想改变原来的那个编号

下面是编号的代码，请老师给看一下，哪块不对了

If e.DataCol.Name = "付款方式" Then
    If e.DataRow.IsNull("付款方式") Then
        e.DataRow("编号") = Nothing
    Else
Dim bh As String = ""
        Dim max As String
        Dim idx As Integer
        max = e.DataTable.Compute("Max(编号)")
        If max > "" Then '如果存在最大编号
            idx = CInt(max.Substring(0,2)) + 1 '获得最大编号的后三位顺序号,并加1
        Else
            idx = 1 '否则顺序号等于1
        End If
        e.DataRow("编号") = bh & Format(idx,"00")
    End If
End If