He conseguido solucionar la mitad de mi duda. 
 
El siguiente código hace que dependiendo de si la lista de texto está visible o no la oculta o la pone visible:    
Código:
 PUBLIC SUB boton_MouseDown() 
IF listatexto.Visible=TRUE THEN 
listatexto.Visible=FALSE 
ELSE IF listatexto.Visible=FALSE THEN 
listatexto.Visible=TRUE 
ENDIF 
END
  Por si a alguien le sirve  
Saludos 
