CATIA宏(输入框不工作)

时间:2013-10-28 07:21:13

标签: macros vbscript vb6

帮助我的气球查找宏不能与输入框一起使用,只有当我手动添加气球编号时它才有效..请告诉我我错过了什么... Ferdo m期待你

语言=" VBSCRIPT"

Sub CATMain()

设置drawingDocument1 = CATIA.ActiveDocument

设置selection1 = drawingDocument1.Selection

result = InputBox(" Ballon Number?"," Title")'变量被赋值为在InputBox中输入的值

selection1.Search" CATDrwSearch.DrwBalloon.BalloonPartName_CAP = result,all"

End Sub

1 个答案:

答案 0 :(得分:0)

我不知道你在做什么,但最后一行看起来不对。我不知道你的函数的文档是什么,但你传递字符串结果而不是变量结果的值,因为它在引号中。假设你的线路正确......

selection1.Search "CATDrwSearch.DrwBalloon.BalloonPartName_CAP= " & result & ",all"