7,763
社区成员
发帖
与我相关
我的任务
分享请教一个语法问题,急,高分相送!
向一个文件中写入文本内容,标准语法是
ts.writeline "aaaaaaaaaaa"
但是现在要写入的内容中包含""双引号,假设需要写入的内容为x="200",这时就有语法错误ts.writeline "x="200"",请问该如何写入该句,才是正确无误的,急,多谢!!!
ts.writeline "aaaaaaaaaaa"
但是现在要写入的内容中包含""双引号,假设需要写入的内容为x="200",这时就有语法错误ts.writeline "x="200"",请问该如何写入该句,才是正确无误的,急,多谢!!!
...全文
请发表友善的回复…
发表回复
jintianatxd 2003-10-12
- 打赏
- 举报
str="x=" & """" & "200" & """"
rainstormmaster 2003-10-12
- 打赏
- 举报
就是在字串中用两个引号表示一个引号
sjmblue 2003-10-12
- 打赏
- 举报
多谢多谢,可以了
rainstormmaster 2003-10-12
- 打赏
- 举报
Private Sub Command1_Click()
Dim FSO As New FileSystemObject
Dim TS As TextStream
Set TS = FSO.CreateTextFile("c:\mytemp.txt")
Dim s As String
s = "x=""200"""
TS.WriteLine s
Set TS = Nothing
Set FSO = Nothing
End Sub
Dim FSO As New FileSystemObject
Dim TS As TextStream
Set TS = FSO.CreateTextFile("c:\mytemp.txt")
Dim s As String
s = "x=""200"""
TS.WriteLine s
Set TS = Nothing
Set FSO = Nothing
End Sub
qiqunet 2003-10-12
- 打赏
- 举报
试试:
ts.writeline "x=" & chr(34) & "200" & chr(34)
ts.writeline "x=" & chr(34) & "200" & chr(34)
