VBA使用无效字符创建和写入文件

Question

我的VBA代码

Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") Dim Fileout As Object Set Fileout = fso.CreateTextFile("C:\users\Home\Desktop\vba.txt", True, True) Fileout.Write "my string goes here" Fileout.Close

我的问题

在行，Fileout.Write“我的字符串在这里”我需要添加导致错误的字符。我需要在字符串中添加“（引号），如下所示。”

Fileout.Write "#@~^jQUAAA==/KxdDP_|2I{;iI"2HK|jj3"P','CR!!ZTT!8@#@&Nr:~"

任何帮助将不胜感激。谢谢。

Answer 1

尝试输入Chr（34）

replace（strString，“”“，chr（34））

“＃@〜^ jQUAAA == / KxdDP_ | 2I {; iI”2HK | jj3“＆amp; chr（34）＆amp;”P'，'CR !! ZTT！8 @＃@＆amp; Nr：〜 “