Write Code to get title of all open browsers... ?

Function GettitleAllbrowsers()
  
    GettitleAllbrowsers=""
    Set objBrowser = Description.Create
    objBrowser("micclass").Value = "Browser"
      
    'Get all browsers instances in ObjBrowserLst
    Set objBrowserLst=Desktop.ChildObjects(objBrowser)
         
    'Get the count of all the browsers open
     browsercnt=objBrowserLst.count
     For i = 0 To objBrowserLst.count-1
         'Store title of the Page in a variable 
          GettitleAllbrowsers=GettitleAllbrowsers+Vbnewline&">"+objBrowserLst(i).GetROProperty("title")
     Next
   
     Set objBrowser=nothing
     Set objBrowser=nothing
  
End Function

Call GettitleAllbrowsers()

Msgbox GettitleAllbrowsers