[Resolvido] Comando VB 2008 Hitskin_logo Hitskin.com

Isto é uma pré-visualização de um tema em Hitskin.com
Instalar o tema • Voltar para a ficha do tema

Aldeia RPG
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Suporte ao desenvolvimento de jogos


[Resolvido] Comando VB 2008

4 participantes

Aldeia RPG :: Centro de aprendizagem :: Programação :: Visual Basic

Ir para baixo

[Resolvido] Comando VB 2008 Empty [Resolvido] Comando VB 2008

Mensagem por Paulo Soreto Qui Dez 01, 2011 6:43 pm

Galera, to com uma pequena dúvida, queria saber qual o comando tipo pra verificar se há uma certa palavra na TexBox.
Tipo pra verificar se a TextBox em si é a seguinte palavra eu uso esse comando:
Código:
If TextBox1.Text = "palavra" Then
            'comando
        End If
Mas preciso saber de um comando para verificar se há uma certa palavra na TexBox.

_________________
[Resolvido] Comando VB 2008 FwYnoXI
Paulo Soreto
Paulo Soreto
Lenda
Lenda

Mensagens : 1980
Créditos : 367

Ficha do personagem
Nível: 1
Experiência:
[Resolvido] Comando VB 2008 Left_bar_bleue0/0[Resolvido] Comando VB 2008 Empty_bar_bleue  (0/0)
Vida:
[Resolvido] Comando VB 2008 Left_bar_bleue30/30[Resolvido] Comando VB 2008 Empty_bar_bleue  (30/30)

https://www.aldeiarpg.com/

Ir para o topo Ir para baixo

[Resolvido] Comando VB 2008 Empty Re: [Resolvido] Comando VB 2008

Mensagem por DFox Sex Dez 02, 2011 1:41 am

eu também preciso disso, só que é no RichTextBox

_________________
mãe, tô no youtube
DFox
DFox
Desenvolvedor
Desenvolvedor

Mensagens : 819
Créditos : 63

https://softwool.co/

Ir para o topo Ir para baixo

[Resolvido] Comando VB 2008 Empty Re: [Resolvido] Comando VB 2008

Mensagem por Paulo Soreto Sex Dez 02, 2011 2:15 pm

Eu to precisando para substituir algumas paralvras automaticamente (sugestão do Nanzin).

_________________
[Resolvido] Comando VB 2008 FwYnoXI
Paulo Soreto
Paulo Soreto
Lenda
Lenda

Mensagens : 1980
Créditos : 367

Ficha do personagem
Nível: 1
Experiência:
[Resolvido] Comando VB 2008 Left_bar_bleue0/0[Resolvido] Comando VB 2008 Empty_bar_bleue  (0/0)
Vida:
[Resolvido] Comando VB 2008 Left_bar_bleue30/30[Resolvido] Comando VB 2008 Empty_bar_bleue  (30/30)

https://www.aldeiarpg.com/

Ir para o topo Ir para baixo

[Resolvido] Comando VB 2008 Empty Re: [Resolvido] Comando VB 2008

Mensagem por DragonicK Sex Dez 02, 2011 2:30 pm

If TextBox1.Text.ToLower.Contains("palavra") Then
TextBox1.Text = TextBox1.Text.Replace("Palavra", "Nova Palavra")
End If

Use isso.
DragonicK
DragonicK
Experiente
Experiente

Mensagens : 543
Créditos : 81

Ficha do personagem
Nível: 1
Experiência:
[Resolvido] Comando VB 2008 Left_bar_bleue0/0[Resolvido] Comando VB 2008 Empty_bar_bleue  (0/0)
Vida:
[Resolvido] Comando VB 2008 Left_bar_bleue30/30[Resolvido] Comando VB 2008 Empty_bar_bleue  (30/30)

Ir para o topo Ir para baixo

[Resolvido] Comando VB 2008 Empty Re: [Resolvido] Comando VB 2008

Mensagem por Valentine Sex Dez 02, 2011 2:40 pm

Nadaila escreveu: If TextBox1.Text.ToLower.Contains("palavra") Then
TextBox1.Text = TextBox1.Text.Replace("Palavra", "Nova Palavra")
End If

Use isso.
E no vb6 como faz isso?
Valentine
Valentine
Administrador
Administrador

Medalhas : [Resolvido] Comando VB 2008 ZgLkiRU
Mensagens : 5345
Créditos : 1164

https://www.aldeiarpg.com/

Ir para o topo Ir para baixo

[Resolvido] Comando VB 2008 Empty Re: [Resolvido] Comando VB 2008

Mensagem por DragonicK Sex Dez 02, 2011 3:01 pm

Dim count as byte
Dim start as byte
count = 1
start = 1

TextBox1.Text = Replace(TextBox1.Text, "Palavra", "Nova Palavra", start, count, 0)

Count quer dizer o número de buscas, caso seja 2 irá substituir 2 palavras começando na primeira letra do texto (start). E o 0 no final, quer dizer o tipo de comparação como eu não uso mais o visual basic 6. Não sei qual valor se usa, por padrão deixo em 0.


Última edição por Nadaila em Sex Dez 02, 2011 3:06 pm, editado 1 vez(es)
DragonicK
DragonicK
Experiente
Experiente

Mensagens : 543
Créditos : 81

Ficha do personagem
Nível: 1
Experiência:
[Resolvido] Comando VB 2008 Left_bar_bleue0/0[Resolvido] Comando VB 2008 Empty_bar_bleue  (0/0)
Vida:
[Resolvido] Comando VB 2008 Left_bar_bleue30/30[Resolvido] Comando VB 2008 Empty_bar_bleue  (30/30)

Ir para o topo Ir para baixo

[Resolvido] Comando VB 2008 Empty Re: [Resolvido] Comando VB 2008

Mensagem por Paulo Soreto Sex Dez 02, 2011 3:06 pm

Funcionou perfeitamente aqui xD Vlw ela ajuda

_________________
[Resolvido] Comando VB 2008 FwYnoXI
Paulo Soreto
Paulo Soreto
Lenda
Lenda

Mensagens : 1980
Créditos : 367

Ficha do personagem
Nível: 1
Experiência:
[Resolvido] Comando VB 2008 Left_bar_bleue0/0[Resolvido] Comando VB 2008 Empty_bar_bleue  (0/0)
Vida:
[Resolvido] Comando VB 2008 Left_bar_bleue30/30[Resolvido] Comando VB 2008 Empty_bar_bleue  (30/30)

https://www.aldeiarpg.com/

Ir para o topo Ir para baixo

[Resolvido] Comando VB 2008 Empty Re: [Resolvido] Comando VB 2008

Mensagem por Valentine Sex Dez 02, 2011 4:44 pm

Obrigado, se as 2 dúvidas foram solucionadas, então tópico trancado.

+ 2 créditos pro Nadaila
Valentine
Valentine
Administrador
Administrador

Medalhas : [Resolvido] Comando VB 2008 ZgLkiRU
Mensagens : 5345
Créditos : 1164

https://www.aldeiarpg.com/

Ir para o topo Ir para baixo

[Resolvido] Comando VB 2008 Empty Re: [Resolvido] Comando VB 2008

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

Aldeia RPG :: Centro de aprendizagem :: Programação :: Visual Basic

 
Permissões neste sub-fórum
Não podes responder a tópicos