51Testing软件测试论坛

标题: 关于ROBOT中ASC II码转换的问题 [打印本页]

作者: jyxuan 时间: 2005-2-20 10:43
标题: 关于ROBOT中ASC II码转换的问题
Sub Main
Dim Result As Integer
dim i as integer
Window SetContext, "Caption=新建文本文档.txt - 记事本", ""
EditBox Click, "ObjectIndex=1", "Coords=124,18"
i=96
InputKeys Asc(i)
End Sub
错误提示：
1.rec(29) Error: Type mismatch, parameter 1 in function 'Asc'
对于这里的ASC II 码因该怎么样来转换。正确的语句应该怎么写？

作者: pcl2004_27 时间: 2005-2-20 14:25
syntax is Asc( string$ )

你的参数错误！传入的是字符串，不是数值

作者: jyxuan 时间: 2005-2-21 09:46
我想要用AscII码的数字来转换因该用什么语句？例如：“我现在知道一个数字，它对应一个字符，我要用什么方法来把数字转换成为字符？

作者: pcl2004_27 时间: 2005-2-21 11:29
用CHR函数

就可以实现你的转换

作者: jyxuan 时间: 2005-2-21 12:08
好的，我是一下。

作者: jyxuan 时间: 2005-2-21 15:22
按照你的提示我从新作了以下代码：
Sub Main
Dim Result As Integer
dim i as integer

'Initially Recorded: 2005-2-20 10:26:37
'Script Name: 1
StartApplication "C:\WINDOWS\NOTEPAD.EXE"

Window SetContext, "Caption=无标题 - 记事本", ""
EditBox Click, "ObjectIndex=1", "Coords=193,22"
i=98
InputKeys chr$(i)
End Sub
成功实现，转换过程

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)