Usuário com melhor resposta
primeira letra de uma string

Pergunta
-
Respostas
-
Boa tarde.
Segue um exemplo completo em VB.Net
Se ajudar, por gentileza, marque como útil/resposta.
Private Sub Bu_Verifica_Click(sender As Object, e As System.EventArgs) Handles Bu_Verifica.Click TextBox1.Text = TextBox1.Text.Trim If TextBox1.Text = "" Then MessageBox.Show("O TextBox1 está vazio.") Exit Sub End If Dim primeira_letra As Char = TextBox1.Text.First If Char.IsLetter(primeira_letra) Then MessageBox.Show("O primeiro caracter é uma letra.") If Char.IsUpper(primeira_letra) Then MessageBox.Show("A primeira letra é maiúscula.") Select Case TextBox1.Text.Substring(0, 1) Case "A", "E", "I", "O", "U" MessageBox.Show("É uma vogal maiúscula.") Case Else MessageBox.Show("É uma consoante maiúscula.") End Select Else MessageBox.Show("A primeira letra é minúscula.") Select Case TextBox1.Text.Substring(0, 1) Case "a", "e", "i", "o", "u" MessageBox.Show("É uma vogal minúscula.") Case Else MessageBox.Show("É uma consoante minúscula.") End Select End If End If End Sub
MARIANO1776
- Editado Mariano1776 quinta-feira, 25 de janeiro de 2018 19:54 Erro de digitação
- Sugerido como Resposta Mariano1776 sexta-feira, 26 de janeiro de 2018 22:15
- Marcado como Resposta Filipe B CastroModerator quarta-feira, 31 de janeiro de 2018 17:58
-
Voce pode usar regex ou os metodo abaixo
string s=Console.ReadLine(); char primeiraletra=s.First(); if (primeiraletra.IsUpper()) { //é maiscula } switch (primeiraletra) { case 'a': case 'e': case 'i': case 'o': case 'u': //é vogal default: //nao é vogal... possivelmente consoante }
William John Adam Trindade
Analyste-programmeur
Sogi Informatique ltée
If you found this post helpful, please "Vote as Helpful". If it actually answered your question, remember to "Mark as Answer". Se achou este post útil, por favor clique em "Votar como útil". Se por acaso respondeu sua dúvida, lembre de "Marcar como Resposta".- Sugerido como Resposta Juliano Nunes Silva Oliveira quinta-feira, 25 de janeiro de 2018 15:40
- Marcado como Resposta Filipe B CastroModerator quarta-feira, 31 de janeiro de 2018 17:58
Todas as Respostas
-
Voce pode usar regex ou os metodo abaixo
string s=Console.ReadLine(); char primeiraletra=s.First(); if (primeiraletra.IsUpper()) { //é maiscula } switch (primeiraletra) { case 'a': case 'e': case 'i': case 'o': case 'u': //é vogal default: //nao é vogal... possivelmente consoante }
William John Adam Trindade
Analyste-programmeur
Sogi Informatique ltée
If you found this post helpful, please "Vote as Helpful". If it actually answered your question, remember to "Mark as Answer". Se achou este post útil, por favor clique em "Votar como útil". Se por acaso respondeu sua dúvida, lembre de "Marcar como Resposta".- Sugerido como Resposta Juliano Nunes Silva Oliveira quinta-feira, 25 de janeiro de 2018 15:40
- Marcado como Resposta Filipe B CastroModerator quarta-feira, 31 de janeiro de 2018 17:58
-
Boa tarde.
Segue um exemplo completo em VB.Net
Se ajudar, por gentileza, marque como útil/resposta.
Private Sub Bu_Verifica_Click(sender As Object, e As System.EventArgs) Handles Bu_Verifica.Click TextBox1.Text = TextBox1.Text.Trim If TextBox1.Text = "" Then MessageBox.Show("O TextBox1 está vazio.") Exit Sub End If Dim primeira_letra As Char = TextBox1.Text.First If Char.IsLetter(primeira_letra) Then MessageBox.Show("O primeiro caracter é uma letra.") If Char.IsUpper(primeira_letra) Then MessageBox.Show("A primeira letra é maiúscula.") Select Case TextBox1.Text.Substring(0, 1) Case "A", "E", "I", "O", "U" MessageBox.Show("É uma vogal maiúscula.") Case Else MessageBox.Show("É uma consoante maiúscula.") End Select Else MessageBox.Show("A primeira letra é minúscula.") Select Case TextBox1.Text.Substring(0, 1) Case "a", "e", "i", "o", "u" MessageBox.Show("É uma vogal minúscula.") Case Else MessageBox.Show("É uma consoante minúscula.") End Select End If End If End Sub
MARIANO1776
- Editado Mariano1776 quinta-feira, 25 de janeiro de 2018 19:54 Erro de digitação
- Sugerido como Resposta Mariano1776 sexta-feira, 26 de janeiro de 2018 22:15
- Marcado como Resposta Filipe B CastroModerator quarta-feira, 31 de janeiro de 2018 17:58
-
Boa tarde,
Por falta de retorno essa thread está encerrada.
Se necessário favor abrir uma nova thread.
Atenciosamente,Filipe B de Castro
Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita
MSDN Community Support
Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.