Alguns códigos para VB 2008 (TextBox)
2 participantes
Página 1 de 1
Alguns códigos para VB 2008 (TextBox)
Bem, vou passar alguns códigos para VB ...
É claro que você vai trocar o TextBox1, pelo nome de seu TextBox
Se você quiser apagar o conteúdo de uma TextBox, adicione uma TextBox, e um botão. Coloque o seguinte código nas propiedades do Botão:
Se quiser copiar o conteúdo da TextBox :
Primeiramente, o comando selecionará o conteúdo da TextBox, e depois copiará o mesmo ...
Comado, cortar em TextBox :
E para colar um texto em uma TextBox, você usa o comando :
Agora, se você quiser escrever em uma TextBox por um comando você coloca :
Se você for fazer um Sistema de Login, e quiser verificar se a senha digitada em uma TextBox for igual a senha digitada em uma segunda TextBox, é só colocar o seguinte código:
"Traduzindo" o codigo:
Explicando : O comando If, significa, "Caso".
Então o código fica o seguinte: Caso o texto da TextBox1 for igual ao texto da TextBox2, então aparecerá a caixa de mensagem:O texto é igual, caso não for igual, então aparecerá a mensagem: O texto não é igual
Vô parando por aki galera .. Até a próxima
Se você quiser apagar o conteúdo de uma TextBox, adicione uma TextBox, e um botão. Coloque o seguinte código nas propiedades do Botão:
- Código:
TextBox1.Clear
Se quiser copiar o conteúdo da TextBox :
- Código:
TextBox1.SelectAll
TextBox1.Copy
Primeiramente, o comando selecionará o conteúdo da TextBox, e depois copiará o mesmo ...
Comado, cortar em TextBox :
- Código:
TextBox1.SelectAll
TextBox1.Cut
E para colar um texto em uma TextBox, você usa o comando :
- Código:
TextBox1.Paste
Agora, se você quiser escrever em uma TextBox por um comando você coloca :
- Código:
TextBox1.Text = (" O que você quiser escrever... ")
Se você for fazer um Sistema de Login, e quiser verificar se a senha digitada em uma TextBox for igual a senha digitada em uma segunda TextBox, é só colocar o seguinte código:
- Código:
If TextBox2.Text = (TextBox1.Text) Then
MsgBox("O texto é igual")
Else
MsgBox("O texto não é igual")
End If
"Traduzindo" o codigo:
- Código:
Caso a CaixadeTexto1.Texto = CaixadeTexto1.Texto Então
CaixadeMensagem("O texto é igual")
Se Não
CaixadeMensagem("O texto não é igual")
Fim de Caso
Explicando : O comando If, significa, "Caso".
Então o código fica o seguinte: Caso o texto da TextBox1 for igual ao texto da TextBox2, então aparecerá a caixa de mensagem:O texto é igual, caso não for igual, então aparecerá a mensagem: O texto não é igual
Vô parando por aki galera .. Até a próxima
Tadeu Barbosa- Mensagens : 4
Data de inscrição : 08/11/2011
Localização : Minas Gerais
Tópicos semelhantes
» VB 2008 - Navegador de Internet Simples
» Anti Malware em Visual Basic 2008!
» Um navegador de internet feito em Visual Basic 2008
» Dicas para o fórum.
» Ranks para o fórum!
» Anti Malware em Visual Basic 2008!
» Um navegador de internet feito em Visual Basic 2008
» Dicas para o fórum.
» Ranks para o fórum!
Página 1 de 1
Permissões neste sub-fórum
Não podes responder a tópicos