VBS 的回车换行符

最新推荐文章于 2024-07-18 10:16:52 发布

滨边美波她男友

最新推荐文章于 2024-07-18 10:16:52 发布

阅读量5.1k

点赞数 1

文章标签： microsoft

本文链接：https://blog.csdn.net/weixin_42109053/article/details/124050841

版权

VBS 的回车换行符号

常数	值	描述
vbCr	Chr(13)	回车符
vbCrLf	Chr(13) & Chr(10)	回车符与换行符
vbFormFeed	Chr(12)	换页符
vbLf	Chr(10)	换行符
vbNullChar	Chr(0)	值为 0 的字符
vbTab	Chr(9)	水平附签
vbVerticalTab	Chr(11)	垂直附签

示例脚本

#$language = "VBScript"
#$interface = "1.0"

crt.Screen.Synchronous = True

' This automatically generated script may need to be
' edited in order to work correctly.

Sub Main
    crt.Screen.Send chr(13)
    crt.Screen.WaitForString "root@petalinux:" & chr(126) & "# "
    Do
        crt.Screen.Send "one-wire-app" & chr(13)
        crt.Screen.Send  Chr(13) & Chr(10) 
        crt.Sleep(3000)
    Loop Until crt.Screen.WaitForString ("[ PASS ]",10)<>True
    MsgBox "循环结束"
End Sub