很简单：
Dim Multi As String = "ab|cd|ef"Dim Values() As StringValues = Multi.split("|")For Each value As String In values Dim dr As DataRow = DataTables("表A").AddNew() dr("第一列") = valueNext
加好友 
发短信
Post By：2012/1/4 9:49:00 [显示全部帖子]
