[求助]还原单位 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]还原单位

共有6334人关注过本帖树形打印复制链接主题：[求助]还原单位

18107532666

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

等级：幼狐帖子：124 积分：1148 威望：0 精华：0 注册：2019/12/27 20:56:00

[求助]还原单位 发帖心情

Post By：2022/11/15 17:39:00 [显示全部帖子]

把10m3 或100m3还原成m3 用下列代码可以用，如果要是个或吨或公里等用下列代码提示从字符串“”到类型“Double”的转换无效。求教各位老师如果修改下列代码。

'还原单位

If e.DataCol.Name = "单位" Then'如果变动列为成本名称

Dim dl As DataRow = e.DataRow'定义ds为行

If e.DataRow("单位") <> Nothing Then

Dim s As String = e.DataRow("单位")

Dim p As String = "[a-zA-Z]+"

Dim r As New System.Text.RegularExpressions.Regex(p)

Dim str = r.Split(s)

Dim k As String = s.Substring(str(0).Length)

dl("单位复原") = k

End If

18107532666

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

等级：幼狐帖子：124 积分：1148 威望：0 精华：0 注册：2019/12/27 20:56:00

Post By：2022/11/16 0:20:00 [显示全部帖子]

比如说100m3 用上述代码可以复原成m3 如果是100吨就不能复原成吨或者是100立方米也不能复原成立方米

[此贴子已经被作者于2022/11/16 0:20:41编辑过]

18107532666

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

等级：幼狐帖子：124 积分：1148 威望：0 精华：0 注册：2019/12/27 20:56:00

Post By：2022/11/17 4:00:00 [显示全部帖子]

如果加到我的代码中要怎么加？

主题：[求助]还原单位