于字串切割后，将使用Replace (vb.net)

我有一字串透过,来切割「，」再切割完之后，将字串中的###换成「,」请问怎么实现

比较笨的方式就是
HG_ID=Replace(arr(0),trim,"###","",)
HG_CKname=Replace(arr(1),trim,"###","",)
................
有没有比较好的方式

感觉你已经尽力了:)
如果第2步把###替换成逗号以外的标点，那可以先替换###，再进行split处理效率高一些，但是要替换成逗号的话，感觉没有别的更好的办法了。

这样可以不？

str = Replace(str,",","|")
str = Replace(str,"###",",")
Dim arr() As String = Split(str, "|")