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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 算法溢出

共有3506人关注过本帖树形打印复制链接主题：算法溢出

刘林

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

等级：八尾狐帖子：1953 积分：15015 威望：0 精华：0 注册：2016/4/28 9:58:00

算法溢出

Post By：2021/7/2 7:02:00 [显示全部帖子]

dim ks as integer

Dim kls As DataRow = DataTables("成绩").Find(filter)

If kls Is Nothing

messagebox.show(tb.Current("考号"))

kh = val(tb.Current("考号"))

messagebox.show("问题0.24")

Dim nj As String = tb.current("年级")

messagebox.show("问题0.25")

原来好好的代码，现在出现 kh = val(tb.Current("考号")) 到这句时出现算法溢出，考号为字符字段。

请问老师是什么情况？谢谢

刘林

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

等级：八尾狐帖子：1953 积分：15015 威望：0 精华：0 注册：2016/4/28 9:58:00

Post By：2021/7/3 10:22:00 [显示全部帖子]

现在就是要进行数值处理，除了val外，还有什么方式将数字型字符转成整型数据？

刘林

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

等级：八尾狐帖子：1953 积分：15015 威望：0 精华：0 注册：2016/4/28 9:58:00

Post By：2021/7/3 11:16:00 [显示全部帖子]

老师，有这种情况，学校已打印了所有考号信息表，坐位号等，还没考试前突然转来一学生要参加考试，就要追加一个学生报名信息，为不动其他已打表格，就追加到最后，由于前面数据结构没有想到做成整数，所有就存在上面的问题，现在改为clng就可以了，但有点不理解的是为什么原来没这个问题

刘林

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

等级：八尾狐帖子：1953 积分：15015 威望：0 精华：0 注册：2016/4/28 9:58:00

Post By：2021/7/3 12:07:00 [显示全部帖子]

因为表的最追加一个，在最大考号上增加1作为追加的学生的考号

[此贴子已经被作者于2021/7/3 12:07:33编辑过]

主题：算法溢出