MASKEDBOX
Alguém sabe como deixar um MaskEdBox [ Locked True ]
Peguei este trecho da internet
Citação:a maskedbox não pode ser travado como a textbox, por causa da ausencia do comando Locked. A única maneira que eu conheço é pelo comando enabled escolhendo a opção false, porém ela ficará com aquela apareça meio que feia de estar desabilitada (toda cinza).
Porém não sei se ajuda muito, mas costumo colocar o componente frame, pois, além de agrupar varios componentes vc pode travar a frame atraves do comando Locked, assim automaticamente travará os componentes dentro da frame.
Agora se o caso é necessáriamente apenas travar essa maskedbox sem que utilizar o comando enabled, crie a frame reduza do tamanho da maskedbox. Na frame existe a opção Border Sytle e selecione a opção [Ô]0 - None[Ô]. Isso fara que a linha de contorno seja invisivel, e agora e só usar o comando locked para trava-la. A vantagem que vejo é apenas a estetica de deixar o campo da maskedbox no tom branco (sem aquele fundo cinza) como as textbox quando são travadas.
Mas na Frame não existe o comando Locked, só o comando Enabled igual ao Mask
[txt-color=#e80000]frame1.enabled = false[/txt-color]
Private Sub MaskEdBox1_KeyPress(KeyAscii As Integer)
KeyAscii = 0
End Sub
Ele anula todas as teclas pressionadas enquanto o componente estiver em SetFocus.
Ou vovcê pode fazer assim:
Private Sub MaskEdBox1_KeyPress(KeyAscii As Integer)
[txt-color=#0000f0]If[/txt-color] KeyAscii = 13[txt-color=#0000f0] Then[/txt-color] SendKeys ([Ô]{TAB}[Ô]) [txt-color=#007100] [ô]Dessa forma você permite passar o ENTER como TAB[/txt-color]
KeyAscii = 0
End Sub
Obrigado funcionou direitinho