关于Object Properties的使用

TestTest

我今天第一次用了Object Properties。我的目的是：判断删除按钮是否enable，是的话，就点击删除按钮，直到删除按钮disable.抓出来的脚本是下面的东西
Dim IsEnable As Integer
IsEnable = PushButtonVP (CompareProperties, "Type=Panel;Name=pnlFrame;\;Type=Control;Name=TeacherInfo;\;Type=Control;Name=panelBody;\;Type=Control;Name=panelCommand;\;Type=PushButton;Name=cmdDelete;VisualText=削除(&D)", "VP=Object Properties4")
Window ResetTestContext, "", ""

虽然运行通过了，但是觉得好难看呀。能否有好看一点的，比如：
PushButtonVP（CompareProperties, "VisualText=削除(&D)", "VP=enable")。
这样以后也看得懂啊。

xalee

难看？嗯，这个理由不错。

要好看也不难，查证点本来就可以改名字的；对象识别的方法也可以尝试精简一下，不过不要找不到就好了。

要想以后甭管谁都能看懂，还是多写点儿注释吧。;-)

hth

TestTest

我EDIT的时候，只选择了enable,text了。怎么出来的内容这么多？