vb.net - 查找和替换在一个永无止境的循环中运行

Question

我目前在我的脚本中使用此代码片段来替换 ASCII 文件中的文本

        Dim fso, inputFile, outputFile
        Dim str As String
        Const quote As String = """"
        Dim MyFile As String = Folder & "\client-1\com\company\assembleegameclient\parameters\Parameters.class.asasm"

        fso = CreateObject("Scripting.FileSystemObject")
        inputFile = fso.OpenTextFile(MyFile, 1)
        str = inputFile.ReadAll
        str = Replace(str, quote & TextBox1.Text & quote, quote & TextBox3.Text & quote)
        outputFile = fso.CreateTextFile(MyFile, True)
        outputFile.Write(str)


        System.Threading.Thread.Sleep(5000)

我将线程放在末尾，看看它是否可以通过等待来解决问题，但它不起作用。脚本中的下一步需要在继续之前完全完成此部分。有没有办法通过waitforexit 将此附加到进程？或类似的适用于字符串的东西？

如果它能够输出所做的更改数量并且它是完整的，那将是最佳的。