Estou usando essa função para abaixo para colocar o R$, e gostaria q o meu cursor, qdo estiver no TextBox: Vlr, já esteja posicionado no Len 4, como faço isso? Abaixo estou errando algo?

 

 

essa é a função no Change

If Len(txtVlr) = 0 Then
   txtVlr = txtVlr + "R"
   txtTelVlr.SelStart = 2
End If

If Len(txtVlr) = 1 Then
   txtVlr = txtVlr + "$"
   txtTelVlr.SelStart = 3
End If

If Len(txtVlr) = 2 Then
   txtVlr = txtVlr + " "
   txtTelVlr.SelStart = 4
End If

 

vlw

Hummm...

 

Só tenta isso:

 

Private Sub Text1_GotFocus()
Text1 = "R$ "
Text1.SelStart = Len(Text1)
End Sub

 

só isso acho q faz o q vc quer...testa ae

 

t+

Ghost

O q faz mesmo o Evento  GotFocus, aliás eu queria reforçar meu estudo sobre os eventos q tenho alguma dúvida, vc tem algum material??/

 

vlw

Bem básicamente:

GotFocus: Dispara o evento quando o controle recebe o foco. É a versão contrária do LostFocus, que dispara o evento quando o controle perde o foco.

Creio q o MSDN (help) q vem junto com o vb Enterprise tem...

Ou online www.msdn.com

 

t+