ENTER VIA CODIGO
Olá pessoal!
Preciso amarrar uma função, onde o usuário após selecionar um item, meu sistema acione o enter via código.
No delphi usava algo como o CHR(13)+CHR(13)
No VB.Net tem como fazer isso ?
Preciso amarrar uma função, onde o usuário após selecionar um item, meu sistema acione o enter via código.
No delphi usava algo como o CHR(13)+CHR(13)
No VB.Net tem como fazer isso ?
vc pode usar
VbCrLf
Chr(13)
VbNewLine
porém não entendi muito bem o que quer fazer
detalhe melhor, o que seria após selecionar um item ?
VbCrLf
Chr(13)
VbNewLine
porém não entendi muito bem o que quer fazer
detalhe melhor, o que seria após selecionar um item ?
Olá!
Tenho uma tabcontrol com várias abas em uma delas tem um combobox que irá atender uma condição quando da mudanças das abas. Quando o usuário retorna para a aba anterior se o combobox.text estiver preenchido, preciso acionar enter via código para que o mesmo recarregue uma caixa de texto.
Quando o usuário tecla enter funciona legalzinho, mas preciso que isso seja automático.
Tentei:
Private Sub txt_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txt.KeyPress
If CInt(Keys.Enter) Then
call buscatxt() [ô] carrega texto do arquivo txthb.txt
End If
End Sub
Mas não é bem isso que pretendo!
Tenho uma tabcontrol com várias abas em uma delas tem um combobox que irá atender uma condição quando da mudanças das abas. Quando o usuário retorna para a aba anterior se o combobox.text estiver preenchido, preciso acionar enter via código para que o mesmo recarregue uma caixa de texto.
Quando o usuário tecla enter funciona legalzinho, mas preciso que isso seja automático.
Tentei:
Private Sub txt_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txt.KeyPress
If CInt(Keys.Enter) Then
call buscatxt() [ô] carrega texto do arquivo txthb.txt
End If
End Sub
Mas não é bem isso que pretendo!
Use:
Sendkeys [Ô]{Enter}[Ô]
ou
Sendkeys.Send([Ô]{ENTER}[Ô])
ou
Sendkeys.Send (chr(13))
Sendkeys [Ô]{Enter}[Ô]
ou
Sendkeys.Send([Ô]{ENTER}[Ô])
ou
Sendkeys.Send (chr(13))
Valeu Jaba!
Coloquei a instrução dentro de um If e está funcionando perfeitamente...
If tbempresa.text <> Nothing
call Addempresa(1)
Sendkeys.Send([Ô]{ENTER}[Ô]) [ô] aciona tecla enter se a empresa já estiver selecionada
endif
Coloquei a instrução dentro de um If e está funcionando perfeitamente...
If tbempresa.text <> Nothing
call Addempresa(1)
Sendkeys.Send([Ô]{ENTER}[Ô]) [ô] aciona tecla enter se a empresa já estiver selecionada
endif
Tópico encerrado , respostas não são mais permitidas