Visual Basic fornece ferramentas suficientes para executar operações simples, como a contagem de palavras , letras ou até mesmo personagens específicos como vogais e consoantes, sem a necessidade de uma grande quantidade de trabalho. Coisas que você precisa
Visual Basic
Visualizar Mais instruções
1

Crie um novo projeto Visual Basic , abrindo Visual Basic e escolher "Create Project ... " a partir do diálogo Project recentes que aparece. Alternativamente, você pode ir para o menu Arquivo e escolha a opção " Novo Projeto . " Esta será uma aplicação básica do Windows, assim , simplesmente clique em Avançar ou OK para todas as outras caixas de diálogo que surgem para uma configuração padrão até que você se depara com um formulário em branco no o designer GUI.
2

Adicione um RichTextBox , arrastando o componente RichTextBox na lista de componentes em sua forma . Arraste as bordas para que ele ocupa a maior parte do formulário, mas deixe um espaço na parte inferior.
3

Adicione uma etiqueta , arrastando-o a partir da lista componentes e colocá-lo sob o RichTextBox. Vá para a caixa de Propriedades, que está no canto inferior direito da janela , por padrão. Encontre a propriedade de texto e mude para " Contagem vogal : " . " Etiqueta " de Certifique-se de definir o rótulo suficientemente longe lado direito , de modo que você pode adicionar a vogal contar com o texto mais tarde, sem o texto fora da fronteira da a janela.
4

Adicionar um botão a partir da lista componentes e colocá-lo ao lado do rótulo contagem vogal. Mais uma vez, certifique-se de dar o seu espaço rótulo para mais três ou quatro caracteres a serem adicionados a ele para a sua contagem de vogal. Altere a propriedade Text do botão para que ele lê "Conte Vogais " em vez de "Button ".
5

Dê um duplo clique no botão . Isto irá abrir o código-fonte para a sua janela e criar automaticamente uma função de evento a ser chamado sempre que o botão é clicado pelo usuário. O nome da função será muito semelhante ao " Button1_Click ". Todo o código vai dentro dessa função .
6

Digite o código a seguir .

Dim letras ( RichTextBox1.Text . Comprimento) Como Charletters = RichTextBox1.Text.ToUpper.ToCharArray ()

Dim count = 0

Para cada letra lettersSelect Caso CaixaAlta "A" , "E" , "I" , " O", "U" contar + = 1End SelectNext

Label1.Text = " contagem vogal :" + CStr ( contagem)

indo linha por linha , este função cria um array de caracteres nomes " letras . " em seguida, ele copia o texto do RichTextBox , altera a cópia de modo que é tudo em maiúsculas. Isso irá reduzir o número de vogais que você precisa olhar para a apenas suas versões maiúsculas.

Em seguida, um número inteiro é criado para manter a contagem de vogais como eles são contados.

Então , o código começa a avançar através da lista de letras, uma por uma , e verifica cada carta para ver se é uma vogal. Se for, então a contagem variável é aumentada em um.

Finalmente , o rótulo contagem vogal está definido para imprimir o resultado.
7

Pressione a seta verde para testar a sua aplicação.