Usuário com melhor resposta
Ctrl+c e Ctrl+v...que codigo no Visual Basic?

Pergunta
-
Olá, amigos,
Ctrl+c e Ctrl+v via teclado é simples, certo?
Mas, gostaria que ao apertar um botão, realizasse este comando como se fosse no teclado...é possível?
Por ex.
Criei: TextBox1, TextBox2, Botão 1 e Botão 2
Escrevo qualquer texto no Textbox 1 e aperto Botão 1 e depois ao apertar o Botão 2, quero que apareça o que escrevi no TextBox1 no TextBox2Sei que utilizando o clipboard funciona mas, não queria utilizar o clipboard e sim os comandos em código.
Obrigado pela atenção de todos.
Respostas
-
Agora entendi.
Comando Ctrl + C = Clipboard.SetText(TextBox1.Text)
Comando Ctrl + V = TextBox2.Text = Clipboard.GetText()
Aqui no exemplo que criei o TextBox1 é o Textbox do primeiro aplicativo, e o TextBox2 é o Textbox do segundo Aplicativo.
Código do botão do primeiro aplicativo:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Clipboard.SetText(TextBox1.Text)
End SubCódigo do Botão do Segundo aplicativo:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox2.Text = Clipboard.GetText()
End Sub^_^
- Sugerido como Resposta Levi DomingosModerator segunda-feira, 27 de setembro de 2010 16:30
- Marcado como Resposta Levi DomingosModerator domingo, 7 de novembro de 2010 15:06
Todas as Respostas
-
Olá Novato2010,
Essa é uma tarefa bem simples.Observe o código abaixo:
Dim copy As String Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click If TextBox1.Text = "" Then MsgBox("Insira uma entrada", , "Entrada Inválida") Exit Sub End If copy = TextBox1.Text End Sub Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click If TextBox1.Text = "" Then MsgBox("Insira uma entrada", , "Entrada Inválida") Exit Sub End If TextBox2.Text = copy End Sub
Apenas uma sujestão: Se hovesse apenas um botão para executar essa tarefa talvez seria melhor, pelo menos bem mais fácil.Daí o código do botão ficaria assim:
TextBox2.Text = TextBox1.Text
Espero ter ajudado.
-
Herbert,
Obrigado pela dica.
mas, na verdade não era isso o que eu queria...me desculpe, acho que formulei mal a pergunta.
Na verdade o que eu gostaria de saber é como posso executar um comando de Ctrl + V ao apertar um Botão.Ou seja, Botão 1 = Ctrl + C e Botão 2 = Ctrl + V
Vou explicar porque preciso disso:
1) Criei um programa com um TextBox e Botão.
2) Criei um segundo programa totalmente separado do primeiro: Criei TextBox e BotãoAgora, inseri uma frase no TextBox do primeiro programa e ao apertar o Botão, seria Ctrl + C (Copiar frase do TextBox).
Depois, no outro programa, ao apertar Botão, seria Ctrl + V, colando a frase copiada no TextBox.Será que é possível?
-
Agora entendi.
Comando Ctrl + C = Clipboard.SetText(TextBox1.Text)
Comando Ctrl + V = TextBox2.Text = Clipboard.GetText()
Aqui no exemplo que criei o TextBox1 é o Textbox do primeiro aplicativo, e o TextBox2 é o Textbox do segundo Aplicativo.
Código do botão do primeiro aplicativo:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Clipboard.SetText(TextBox1.Text)
End SubCódigo do Botão do Segundo aplicativo:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox2.Text = Clipboard.GetText()
End Sub^_^
- Sugerido como Resposta Levi DomingosModerator segunda-feira, 27 de setembro de 2010 16:30
- Marcado como Resposta Levi DomingosModerator domingo, 7 de novembro de 2010 15:06
-
-