ROBOT怎样实现换行

godflesh81

例如：msgbox "this is line1\n This is line2"
能不能不通过添加空字符的方式实现换行？？

ilovejolly

MsgBox "haha" & vbCrLf & "hehe" & vbCrLf & "xixi"

试试

godflesh81

Error: Variable vbCrLf undefined
提示vbCrLf没有定义。。是不是需要加载什么文件阿？？

caesarqth

用Chr把ASCII的10或者13转换成回车符就可以了

Chr(10)或者Chr(13)就表示回车

msgbox "this is line1 " & chr(10) & "This is line2"
msgbox "this is line1 " & chr(13) & "This is line2"

[ 本帖最后由 caesarqth 于 2006-5-10 12:42 编辑 ]

godflesh81

因为需要做字符串验证 所以如果用chr(10)来代替的话  字符串会发生变化 从而导致验证失败。。。

caesarqth

你要验证哪个字符串啊？
可不可以用Instr指定要验证的字符串的位置来进行啊

godflesh81

例如我想验证：
hello
world

验证的字符串是分2行显示的。。那么如何来实现呢？

caesarqth

1.不知道你把该字符串输出到哪里，如果在记事本或word里，可以用逐项查找的方法来验证，使用windowVP验证

2.如果能够抓取字符串的话，可以用clipboardVP抓取需要验证的进行验证

3.下面我是用Instr函数实现的
Sub main
    Dim undertest as String
     Dim position1 as Integer
    Dim position2 as Integer

    '需要验证的两行字符
    undertest = "hello" & chr(10) & "word"
    msgbox undertest
    position1=InStr(undertest,"hello")
    position2=InStr(undertest,"wod")
    If position1 AND position2 then
        SQALogMessage sqaPass, "找到字符串", ""
        msgbox "success"
    Else
        SQALogMessage sqaFail, "未找到字符串", ""
        msgbox "fail"
    End If   
End Sub

如果以上都不行，那我就不知道了，不好意思