Supported in UFT One versions 2021 and later.
A collection of API tests.
|Count||The number of API tests in the collection.|
|Item||Returns the name or path of an API test located in the specified position.|
' Create the application object Dim qtApp Set qtApp = CreateObject("QuickTest.Application") 'Start UFT One qtApp.Launch qtApp.Visible = True 'Open a GUI test that contains API tests test1 = "C:\Tests\GUITest2" qtApp.Open test1 Set apitests = qtApp.Test.APITests count = apitests.Count For i = 1 To count MsgBox apitests.Item(i).Name 'Get the name of the API test by index, starting from 1 MsgBox apitests.Item(i).Path 'Get the path of the API test by index, starting from 1 Next