Sub SetWindowTitle( title$ )
Sets the title of the window