Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
[COLOR=red]Declare Function MultiTab (NumberOfTabs As Integer) As String[/color]
Sub Main
Dim sys as object
Dim sess as object
Dim myscreen as object
Set MyScreen = CreateObject("EXTRA.System").ActiveSession.Screen
[COLOR=red] MyScreen.Sendkeys MultiTab(5)[/color]
End Sub
[COLOR=red]
Function MultiTab(NumberOfTabs As Integer) As String
For AllTabs = 0 to NumberOfTabs - 1
sTabString = sTabString & "<tab>"
Next
MultiTab = sTabString
End Function[/color]
assuming x and y don't changeYou'd be so much better off with:
sess0.screen.moveto (X,Y)
or
sess0.screen.putstring "My Text",X,Y