i saw another way to do this, with reflector and setEllipsize, but we don't know how to do with a widget :
Dim r As Reflector
r.Target = TextView
r.RunMethod2("setSingleLine", True, "java.lang.boolean")
r.RunMethod2("setEllipsize", Mode, "android.text.TextUtils$TruncateAt")
r.RunMethod2("setSelected", True, "java.lang.boolean")
...