以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]提取前两个文字  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=157863)
--  作者：hanlingli111999
--  发布时间：2020/10/31 8:53:00
--  [求助]提取前两个文字
蓝老师好，我的表中B列内容为“钢板8厚”的形式，有很多行，钢板与厚之间的数字是随机
变化的，我想在A列仅取B列的钢板2个字符，怎么提取呀，谢谢
--  作者：有点蓝
--  发布时间：2020/10/31 10:21:00
--  
Dim s As String="钢板8厚"
Dim p As String = "\\d+"
Dim r As New System.Text.RegularExpressions.Regex(p)
Dim str = r.Split(s)
For Each a As String In str
    Output.Show(a)
Next
--  作者：hanlingli111999
--  发布时间：2020/10/31 10:24:00
--  
蓝老师，钢板厚有很多行，不都是8厚，也可能为10、20、15等
--  作者：hanlingli111999
--  发布时间：2020/10/31 10:27:00
--  
我想在A列显示
--  作者：有点蓝
--  发布时间：2020/10/31 10:45:00
--  
到DataColChanged事件处理即可

If e.DataCol.Name = "A列" Then \'如果是已结帐列的内容变动
Dim s As String=e.newvalue
Dim p As String = "\\d+"
Dim r As New System.Text.RegularExpressions.Regex(p)
Dim str = r.Split(s)
e.datarow("xxx") = str(0)
End If
--  作者：hanlingli111999
--  发布时间：2020/10/31 10:46:00
--  
我想A列取B列的“钢板”，上述代码无法使用
--  作者：hanlingli111999
--  发布时间：2020/10/31 10:50:00
--  
谢谢老师