主题：编号的问题

If e.DataCol.Name = "员工姓名" Then

    If e.DataRow.IsNull("员工姓名") Then

        e.DataRow("工号") = Nothing

    Else

        Dim cmd As New SQLCommand

        Dim dt As DataTable

        cmd.C

        cmd.CommandText = "SELECT * From {销售人员档案}"

        dt = cmd.ExecuteReader()

        If dt.Datarows.Count > 0 Then

            e.DataRow("工号") = Format(dt.Compute("Max(工号)") + 1,"000")

        Else

            e.DataRow("工号") = "HG" & "001"

        End If

    End If

End If

  这个带有字符的编号,一直提示字符不能转换成DOUBLE数据不成功,我用转换字符的函数也不行