How do I generate Test Results window using descriptive
method ( run time ) after my test execution process?

Please have a look of my below code.

=========================================================

Dim qtApp
Dim qtTest
Dim qtResultsOpt
Set qtApp = CreateObject("QuickTest.Application")
qtApp.Launch
qtApp.Visible = True
qtApp.Options.Run.CaptureForTestResults = "Always"
qtApp.Options.Run.RunMode = "Fast"
qtApp.Options.Run.ViewResults = True
qtApp.Open "C:\Automation\Example", True
Set qtTest = qtApp.Test
qtTest.Settings.Run.OnError = "NextStep"
Set qtResultsOpt = CreateObject
("QuickTest.RunResultsOptions")
qtResultsOpt.ResultsLocation = "C:\Automation\Example\Res1"
qtTest.Run qtResultsOpt
MsgBox qtTest.LastRunResults.Status
qtTest.Close
Set qtResultsOpt = Nothing
Set qtTest = Nothing
Set qtApp = Nothing


==========================================================

This code is working fine, but Test Result window is not
displaying after execution.

Anybody can please help me regading the same.

Thanks
Akshaya Madali
Capgemini India Pvt Ltd
9823213538