|
#2
renxiaoyao362015-05-07 17:31
|
刚学VB 如何 把下面的数字以逗号为界限 分别填到不同单元格
1,1,10.1，1，2,，，，
1,1,1111，122，2333,，，，
2 回复
|
#3
lianyicq2015-05-08 09:08
回复 楼主 suchu16
看你源串中有","和"，"2种分隔符。
先用replace将其中1种替换为另1种，使得字符串中只有1种分隔符 再用split将整理后的字符串分隔断赋值到动态数组中。  程序代码：Private Sub Form_Load() Dim SourceString As String Dim OutputSegment() As String Dim i As Integer SourceString = "1,1,1111，122，2333 " SourceString = Replace(SourceString, "，", ",") OutputSegment = Split(SourceString, ",") For i = 0 To UBound(OutputSegment) Text1.Text = Text1.Text & OutputSegment(i) & " " Next End Sub |
1