UpdateStatusBar Method Example

The example places the message "Hello, user" in a session's status bar.

Sub Main()

 Dim Sys As Object, Sess As Object

 Set Sys = CreateObject("EXTRA.System")

' Assumes an open session

 Set Sess = Sys.ActiveSession

 Sess.UpdateStatusBar "Hello, user."

End Sub