编号的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 编号的问题

共有10422人关注过本帖树形打印复制链接主题：编号的问题

狐狸爸爸

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47448 积分：251060 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/9/20 17:28:00 [显示全部帖子]

感觉你这段代码很不严谨

1、先是判断后台是否有数据，后面又从已经加载的表中取编号的最大值，不有些矛盾吗？

2、至于出错，是因为你的工号列是个字符型，内容时"HG001"、"HG002"，这样的内容怎么能和1相加呢？

[此贴子已经被作者于2011-9-20 17:29:05编辑过]

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47448 积分：251060 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/9/20 17:58:00 [显示全部帖子]

如果你是根据已经加载的表取最大编号，何必从后台判断是否有数据呢？

直接：

if datatables("某表").Datarows.count > 0 Then

end if

不就行了吗？

至于相加问题，这样解决：

Dim s As String = dt.Compute("Max(工号)")
Dim v As Integer = s.SubString(2)
e.DataRow("工号") = Format(v + 1,"000")

主题：编号的问题