主题：从单元格读取指定的文字

Select e.DataCol.name
    Case "编号"
        Dim s As String = e.DataRow("编号")
        s = s.SubString( s.Length - 2,2)
        e.DataRow("文件流水") = e.DataRow("订单名称") & "第" & s & "次" & "变更新"
       
End Select