Difference between revisions of "FindFirstAxisParminParms"
From scripting
(Created page with " Function FindFirstAxisParmInParms(SetParms As Parameters) As Parameter Dim TestStr As String TestStr = "Origin\X" For X = 1 To SetParms.Count If InStr(SetParms.Item(X...") |
(No difference)
|
Latest revision as of 05:33, 22 April 2017
Function FindFirstAxisParmInParms(SetParms As Parameters) As Parameter Dim TestStr As String TestStr = "Origin\X" For X = 1 To SetParms.Count If InStr(SetParms.Item(X).Name, TestStr) <> 0 Then Set FindFirstAxisParmInParms = SetParms.Item(X) Exit Function End If Next End Function