主题：字符串分隔问题

本人菜鸟一个，在用FOXTABIE试着做一个串号管理系统，现在碰到一个问题，就是二维码的分解问题。

二维码扫描出来是一个串号组，最多有50个串号，每个串号用分隔符分开。现要求把串号组分解出来分别添加到表格的某一列（假设是入库表，串号列）

 

比如二维码扫出来是：ABC1234567890，ABC2345678901，ABC3456789012，ABC4567890123，ABC5678901234，ABC6789012345，ABC7890123456，ABC8901234567，ABC9012345678

 

要把里面的9个串号分别提出添加到入库表的串号列里，就相当于添加了九条记录（9行）

 

代码该如何写？请各位前辈指教

 

 

 

简单：

 

Dim nm As String = "ABC1234567890,ABC2345678901,ABC3456789012,ABC4567890123,ABC5678901234,ABC6789012345,ABC7890123456,ABC8901234567,ABC9012345678"
Dim nms() As String  = nms.split(",")
For Each v As String In nms
    Dim dr As DataRow = DataTables("入库表").AddNew()
    dr("串号")  = v
Next

简单却非常实用。

谢了，很不错