USING MASKING TEXTBOX

I use sometimes the 'simple' TEXTbox for input due to the need for control
the sofar total input chararter by character.
sample

Private Sub txtnewUser_Change()
trim (txtnewUser.Text)
txtnewUser.Text = UCase(txtnewUser.Text) '  force uppercase
if  txtnewUser.Text ="JACK" then
....  ' do somthing
end if

if instr(txtnewUser.Text) ="!" then
'print not allowed
end  if

End Sub

Entry has to be sometimes left or rigth aligned.
Now here's my problem,
   Continuing typing in box always start e.g. at left if left alligned,
   I want to continue at cursorlocation after last character, because
   now after every character it starts at left position shifting other
  characters to right,  only way is to place cursor every time at right
 

BIAPROAsked:
Who is Participating?
 
jacobhooverConnect With a Mentor Commented:
I'm confused about your alignment issue, and I am assuming you are using VB6 but you could try:
txtnewUser.SelLength = 0
txtnewUser.SelStart = Len(txtnewUser.Text)

To put the cursor at the end of the input.


If this is not the fianl result you are looking for please rephrase your question.
0
 
BIAPROAuthor Commented:
works, thanks
Jack
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.