我希望有额外的字符将作为分隔我串

-1

Sub SaveInLogs(isThereNewLogs As Boolean, value As String) 

    Dim list As List(Of String) 
    Try 
     list = Strings.Split(value, "#-!-#").ToList 
     list(2) = "Incoming" 
     For Each word In list 
      MsgBox(list) 
     Next 
    Catch ex As Exception 
    End Try 

End Sub

paramater“价值”的价值是这样的：！ 2016年7月28日上午10时19分27秒＃ - - ＃Alex17282016＃ - ！＃＃＃1ST我希望有额外的字符将作为分隔我串

然后我分割这些值并将单词Outgoing改为Incoming。

现在我想让我的字符串再次看起来像这样 2016/7/28 10:19:27＃ - ！ - ＃Alex17282016＃ - ！ - ＃Incoming＃ - ！ - ＃Alex＃ - ！ - ＃ Alex＃ - ！ - ＃Text＃ - ！ - ＃1ST

对不起，我的语法。我希望你明白我的问题

来源

2016-07-28 Alex

为什么在第一个位置分割字符串？ [String.Replace]有什么问题（https://msdn.microsoft.com/en-us/library/windows/apps/fk49wtc1（v = vs.105）.aspx）？ –

为什么不使用JSON？这更简单实用。只是一个建议。 –

我不完全确定你在问什么，但也许''''''''''' – Mark

下面我编辑你的代码已经使字符串的方式，你希望它改变后，“呼出”到“来电”：

Sub SaveInLogs(isThereNewLogs As Boolean, value As String) 

Dim list As List(Of String) 
Dim newValue as String = "" 
Try 
    list = Strings.Split(value, "#-!-#").ToList 
    list(2) = "Incoming" 

    For Each word In list 
     newValue = newValue & word 
    Next 

    value = newValue 
Catch ex As Exception 
End Try 

End Sub

或者马克在评论说，你可以使用，而不是一个循环的string.join：

Sub SaveInLogs(isThereNewLogs As Boolean, value As String) 

Dim list As List(Of String) 
Try 
    list = Strings.Split(value, "#-!-#").ToList 
    list(2) = "Incoming" 

    Dim newValue As String = String.Join("#-!-#", list) 

Catch ex As Exception 
End Try 

End Sub

下面是代码，我觉得会更好地工作，因为它是一个一行代码，也不需要来拆分字符串，并把它回到一起：

Sub SaveInLogs(isThereNewLogs As Boolean, value As String) 

    value = value.replace("#-!-#Outgoing#-!-#", "#-!-#Incoming#-!-#") 

End Sub

来源

2016-07-28 10:10:59

我希望有额外的字符将作为分隔我串

回答

相关问题