Question

Dim sr as new IO.streamreader(xxx.txt)
Dim sw as new IO.streamwriter(xxxx.txt)
Dim s as string = sr.readtoend
dim ssss as string
dim i as integer
while not sr.endofstream
    for i = 0 to 10
        ssss = "hello" & listbox.items(i)
        s = replace(s,"[[abc]]",ssss)
       Call sw.writeline(s)
    Next
End while
call sw.close()

我试图用ssss替换名为xxx的.txt文件中的字符串[[abc]]，然后将其写入另一个名为xxxx的.txt文件中。问题是ssss一直在变化，当我调试程序时，它说s是“Nothing”。我需要新txt中的所有ssss值。所以我想在这种情况下可能“替换”不合适？有关如何解决此问题的任何想法？顺便说一句，我在vs 2012中使用vb，而不是vb 6.0。感谢。

Answer 1

您似乎遇到null错误。当“s”什么都不是时，试着抓住它，如果是的话，跳过它。否则请执行替换。

用

之类的东西检查

         if s <> nothing then
             s = s.replace(s,"[[abc]]",ssss)
            Call sw.writeline(s)
         next

Vb字符串替换

1 个答案: