主题：[求助]字符串提取字段split

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:例子.table

希望输入产品型号的时候能自动能从产品型号里面把型号、压力、口径分离出来，在表属性dotacolchanged或者用表达式

我知道应该用split命令，但是不晓得怎么用。。。

产品型号                                     型号          压力     口径

BZ43WH-16 DN100    ————   BZ43WH     16     DN100

datacolchanged事件。

If e.DataCol.Name = "公司产品图号"
    If e.NewValue = Nothing Then
        e.DataRow("产品型号") = Nothing
        e.DataRow("压力") = Nothing
        e.DataRow("口径") = Nothing
    Else
        Dim chrs() As Char = {"-", " "}
        Dim ary() As String = e.NewValue.split(chrs)
        e.DataRow("产品型号") = ary(0)
        e.DataRow("压力") = ary(1)
        e.DataRow("口径") = ary(2)
    End If
End If