Individuare il nome della finestra di un programma

Da Gambas-it.org - Wikipedia.

E' possibile ottenere il nome della finestra del programma principale usando la proprietà .VisibleName della classe DesktopWindow. La proprietà .VisibleName restituisce il nome della finestra visibile, vale a dire il titolo della finestra come visualizzato dal gestore di finestre.

Il nome visibile della finestra può essere diverso dal nome del programma, quando due o più finestre hanno lo stesso nome.

Public Sub Button1_Click()

 Dim s As String
 Dim dw As New DesktopWindow

' Individuiamo la finestra attiva corrente di primo livello, di cui raccogliere il nome:
   dw = New DesktopWindow(Desktop.ActiveWindow)
 
    s = dw.VisibleName

    Print s
 
'End