Dim str As String = getpy(e.DataRow("第一列"),True)
If str.Length >= 2 Then
e.DataRow("第二列") = str.Substring(0, 2)
End If
加好友 
发短信
Post By：2015/6/16 20:37:00 [显示全部帖子]
