1)
Code:
If TextWidth(List1.Text) > List1.Width - 60 Then
    MsgBox "too big"
End If
The 60 accounts for the "borders" of the Listbox.

------------------
Marty
What did the fish say when it hit the concrete wall?
> > > > > "Dam!"