UC知道用VB编程时，想将某段文字写入某文件中遇到问题
来源：百度知道 编辑：UC知道 时间：2024/06/24 01:35:26
Private Sub Command1_Click()
Open "C:\123.bat" For Append As #1
Print #1, "XXX"
Close #1
MsgBox "文件已生成", bokonly + vbDefaultButton1, "提示"
End Sub
在"XXX"处想写入以下内容：
h:
attrib h:\autorun.inf -a -h -s
del h:\autorun.inf
md h:\autorun.inf
start h:
exit
但是由于需要用回车键，总是提示语法错误。请问本人该怎么办？
谢谢！
Open "C:\123.bat" For Append As #1
Print #1, "XXX"
Close #1
MsgBox "文件已生成", bokonly + vbDefaultButton1, "提示"
End Sub
在"XXX"处想写入以下内容：
h:
attrib h:\autorun.inf -a -h -s
del h:\autorun.inf
md h:\autorun.inf
start h:
exit
但是由于需要用回车键，总是提示语法错误。请问本人该怎么办？
谢谢！
分成多行写入，每行用一个行写入语句。
试试后面加上: & vbcrlf
Private Sub Command1_Click()
Open "C:\123.bat" For Append As #1
Print #1, "h: "
Print #1,"attrib h:\autorun.inf -a -h -s"
Print #1,"del h:\autorun.inf"
Print #1,"md h:\autorun.inf"
Print #1,"start h:"
Print #1,"exit"
Close #1
MsgBox "文件已生成", bokonly + vbDefaultButton1, "提示"
End Sub