DIM A$
 
 A$ = There$("Hello")
 
 ?  A$
 
 FUNCTION There$(C$)
 
   FUNCTION = UCASE$(C$) & " There"
 
 END FUNCTION

Result:

 HELLO There