Try:

s = textbox1.value
firstname = Left(1, s, Instr(s," ") -1)

----- Original Message -----
From: "Sergio Davi Silva Bezerra" <davi@c...>
To: "professional vb" <pro_vb@p...>
Sent: Friday, July 07, 2000 1:34 PM
Subject: [pro_vb] Getting the First word


> Please, i am attempt get the first word of name of a textbox, example:
>
> JOHN WILLIAMS
>
> Display only: JOHN
>
> Sergio Davi Bezerra
>