可以把某列拆分吗?把一列拆分到 第二列和第三列,第二列为第一列的第一个字符,第三列为第一列第二个字符和第二个字符后面的
感谢 感谢
此主题相关图片如下:qq截图20170706212306.png
If e.DataCol.Name = "文件夹编号转换_后10位字符" Then
Dim Oldstr As String =e.DataRow("文件夹编号转换_商品名称")
Dim Newstr As String = ""
For i As Integer = Oldstr.Length - 1 To 0 Step - 1
If Asc(Oldstr.Chars(i)) < 0 AndAlso Newstr.Length < 2 Then
Newstr = Oldstr(i) & Newstr
End If
Next
Newstr = "" & NewStr & ""
'e.DataRow("第六列")
e.DataRow("文件夹编号转换_后10位字符")="" & Newstr & ""
End If