select text

[1362000]

hi
i want to write an activex "a textbox"
i want a property like "selstart" and "sellegth"
how can add that properties to my activex
or how can highlight text by code in activex
thanks

 

[NoCoolHandle]

Control

Public Property Get SelText() as string
   seltext = textbox.seltext
end property

Public Property let SelStart(value as integer)
   textbox1.selstart = value
end property
Public Proptery let SelLen(value as integer)
textbox1.setlen = value
end property
Public Property SelectText(Start as integer,Length as integer)
textbox1.selstart = start
textbox1.sellength = lenght
end property

I think that should do it..

Rob

 

[BobRodes]

In other words, just expose the underlying properties of your "constituent control(s)" (that's what Microsoft calls them) as properties of your control.

Bob