Você está aqui: VB.NET ::: Dicas & Truques ::: Strings e Caracteres

Como transformar em maiúsculas a inicial de cada palavra em uma string

Quantidade de visualizações: 8295 vezes
'Este exemplo mostra como transformar em maiúsculas
'as iniciais de cada palavra em uma string

Module Module1
  Sub Main()
    Dim frase As String = "gosto de programar em java"

    'iniciais maiúsculas
    frase = IniMaiusculas(frase.Trim())

    Console.WriteLine(frase)

    Console.WriteLine()
    Console.WriteLine("Pressione uma tecla para sair...")
    Console.ReadKey()
  End Sub

  Function IniMaiusculas(ByVal str As String) As String
    Dim res As String

    'transforma tudo em minúsculas
    str = str.ToLower()

    'vamos separar a string
    Dim palavras As String() = str.Split(" ")

    'transforma as inicias em maiúsculas
    For i As Integer = 0 To palavras.GetUpperBound(0) Step 1
      'remove espaços desnecessários
      palavras(i) = palavras(i).Trim()
      'inicial maiúscula'
      palavras(i) = palavras(i).Chars(0).ToString.ToUpper _
        & palavras(i).Remove(0, 1)
    Next

    'junta tudo novamente
    res = String.Join(" ", palavras)

    Return res
  End Function
End Module


Link para compartilhar na Internet ou com seus amigos:

VB.NET ::: Fundamentos da Linguagem ::: Estruturas de Controle

Como usar o laço For do VB.NET - Apostila VB.NET para iniciantes

Quantidade de visualizações: 13394 vezes
O laço For...Next é usado quando sabemos exatamente a quantidade de vezes que o bloco de códigos deverá ser executado. Veja um exemplo no qual contamos de 1 a 10:

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

For valor As Integer = 1 To 10 Step 1
  Console.WriteLine(valor)
Next

Veja que o laço For...Next é composto de três partes muito importantes:

a) Inicialização da variável de controle:

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

For valor As Integer = 1

Aqui é onde definimos o valor inicial da variável de controle. No exemplo nós fizemos a declaração da variável no cabeçalho do laço, mas ela pode ser declarada externamente sem nenhum problema.

b) Limite do valor da variável de controle:

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

To 10

A palavra-chave To permite definir o valor máximo que a variável de controle pode alcançar.

c) Incremento da variável de controle:

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

Step 1

A palavra-chave Step permite definir o valor que servirá de incremento para a variável de controle. No exemplo usamos 1, mas poderia ser qualquer valor inteiro.

Veja um exemplo de laço For...Next no qual exibimos os números pares de 0 a 20:

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

For numero As Integer = 0 To 20 Step 2
  Console.WriteLine(numero)
Next

E se quisermos contar de trás para frente? Fácil, basta fornecer um valor negativo para o incremento. Veja:

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

For numero As Integer = 10 To 0 Step -1
  Console.WriteLine(numero)
Next



VB.NET ::: Dicas & Truques ::: Matemática e Estatística

Como testar se um número é primo em VB.NET

Quantidade de visualizações: 1182 vezes
O Número Primo é o número maior que 1 e que só pode ser dividido por 1 e por ele mesmo, ou seja, números primos não podem ser divididos por outros números, a não ser por ele mesmo e pelo número 1. Dessa forma, 2, 3, 5, 7, 11, 13, 17, etc, são todos números primos.

É importante observar que 0 e 1 não são números primos, e que o número 2 é o único número primo par.

Veja agora um código VB.NET completo que pede para o usuário informar um número inteiro positivo e mostra uma mensagem indicando se o número informado é primo ou não:

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

Imports System

Module Program
  Sub Main(args As String())
    Dim primo As Boolean = True ' Vamos assumir que o número é primo

    ' vamos solicitar um número inteiro positivo
    Console.Write("Informe um número inteiro positivo: ")
    Dim numero As Integer = Integer.Parse(Console.ReadLine())

    ' o número é negativo?
    If numero < 0 Then
      Console.WriteLine("Número inválido.")
      ' é 0 ou 1?
    ElseIf ((numero = 0) Or (numero = 1)) Then
      Console.WriteLine("Número válido, mas não é primo.")

      ' passou até aqui. Vamos testar se o número é primo
    Else
      For i As Integer = 2 To (numero / 2) Step 1
        ' se passar no teste, não é primo
        If (numero Mod i = 0) Then
          primo = False ' recebe False
          Exit For
        End If
      Next


      If (primo) Then
        Console.WriteLine("O número informado é primo")
      Else
        Console.WriteLine("O número informado não é primo")
      End If
    End If

    Console.WriteLine("\nPressione qualquer tecla para sair...")
    ' pausa o programa
    Console.ReadKey()
  End Sub
End Module

Ao executar este código VB.NET nós teremos o seguinte resultado:

Informe um número inteiro positivo: 9
O número informado não é primo


VB.NET ::: Fundamentos da Linguagem ::: Estruturas de Controle

Como usar a instrução Continue para abandonar a iteração atual de um laço em VB.NET

Quantidade de visualizações: 7882 vezes
A instrução Continue pode ser usada com os laços do VB.NET para abandonar a iteração atual do laço. Veja como isso funciona no trecho de código abaixo:

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

For valor As Integer = 1 To 10 Step 1
  If valor Mod 2 = 0 Then
    Continue For
  End If

  Console.WriteLine(valor)
Next

Este trecho de código exibirá os números ímpares de 1 a 10. Os números exibidos serão: 1, 3, 5, 7 e 9. Isso aconteceu porque temos uma instrução If que testa se o valor da variável de controle é par. Se o teste resultar verdadeiro, a instrução Continue é executada e a iteração atual é abandonada, fazendo com que o valor atual não seja exibido na tela.

Veja mais um exemplo:

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

Dim valor As Integer = 0

While valor < 10
  valor += 1
  If valor = 5 Then
    Continue While
  End If

  Console.WriteLine(valor)
End While

Este trecho de código conta de 1 a 10, mas pula o número 5. Analise-o cuidadosamente e tente descobrir o porquê.


Vamos testar seus conhecimentos em Ética e Legislação Profissional

Princípios específicos do Direito do Consumidor

Assinale, abaixo, a única alternativa correta.

A) A informação não é direito básico do consumidor.

B) O reconhecimento da vulnerabilidade do consumidor é um dos princípios do Código de Defesa do Consumidor.

C) O Código de Defesa do Consumidor reconhece e dá tratamento isonômico ao consumidor e ao fornecedor.

D) O Código de Defesa do Consumidor é considerado lei geral, enquanto que o Código Civil lei especial.

E) É válida cláusula elaborada pelo fornecedor, onde expressamente impeça o consumidor, que venha a celebrá-lo, de reclamar seus direitos perante o Judiciário.
Verificar Resposta Estudar Cards Todas as Questões

Vamos testar seus conhecimentos em Fundações

Sondagem à Percussão (SPT) e Rotativa (RQD)

Na sondagem SPT, o que significa o N30?

A) Corresponde ao número de golpes dos últimos 30cm na fase de amostragem.

B) Corresponde à energia de 30% a ser considerada.

C) Corresponde a 30 golpes para penetrar um metro.

D) Corresponde ao número de golpes dos primeiros 30cm do amostrador.

E) Corresponde à energia que causa a perfuração dinâmica de 30cm com uma única pancada.
Verificar Resposta Estudar Cards Todas as Questões

Vamos testar seus conhecimentos em Engenharia Civil - Construção Civil

Fases de uma obra

A camada de argamassa executada sobre uma base, que pode ser a parte de baixo de uma laje de piso pré-fabricada ou uma parede, é denominada:

A) Acabamento.

B) Contrapiso.

C) Fundação.

D) Pavimento.

E) Concreto.
Verificar Resposta Estudar Cards Todas as Questões

Vamos testar seus conhecimentos em Engenharia Civil - Construção Civil

Serviços preliminares e instalações provisórias

Em um canteiro de obras, são elementos ligados à produção e ao apoio administrativo, respectivamente:

A) A manutenção de equipamentos e a garagem de veículos pesados.

B) A central de concreto e a manutenção de equipamentos.

C) A central de concreto e o escritório técnico.

D) A sala de treinamento e a central de produção de fôrmas.

E) A área de lazer de operários e a central de pré-moldados.
Verificar Resposta Estudar Cards Todas as Questões

Vamos testar seus conhecimentos em Fenômeno de Transportes e Hidráulica

Equação de Bernoulli

Considere o tubo de fluxo abaixo contendo óleo, que flui de forma a podermos considera-lo um fluido ideal. Ele flui por um tubo que sobe de nível e se estreita. Dois manômetros marcam a pressão em dois pontos do tubo, como mostra a figura. Qual o valor da pressão indicada no segundo manômetro? (Dados: ρóleo = 900 kg / m3 e g = 9,8 m/s2)



A) 290 kPa

B) 109 kPa

C) 114 kPa

D) 286 kPa

E) 90,7 kPa
Verificar Resposta Estudar Cards Todas as Questões

Desafios, Exercícios e Algoritmos Resolvidos de VB.NET

Veja mais Dicas e truques de VB.NET

Dicas e truques de outras linguagens

Códigos Fonte

Programa de Gestão Financeira Controle de Contas a Pagar e a Receber com Cadastro de Clientes e FornecedoresSoftware de Gestão Financeira com código fonte em PHP, MySQL, Bootstrap, jQuery - Inclui cadastro de clientes, fornecedores e ticket de atendimento
Diga adeus às planilhas do Excel e tenha 100% de controle sobre suas contas a pagar e a receber, gestão de receitas e despesas, cadastro de clientes e fornecedores com fotos e histórico de atendimentos. Código fonte completo e funcional, com instruções para instalação e configuração do banco de dados MySQL. Fácil de modificar e adicionar novas funcionalidades. Clique aqui e saiba mais
Controle de Estoque completo com código fonte em PHP, MySQL, Bootstrap, jQuery - 100% funcional e fácil de modificar e implementar novas funcionalidadesControle de Estoque completo com código fonte em PHP, MySQL, Bootstrap, jQuery - 100% funcional e fácil de modificar e implementar novas funcionalidades
Tenha o seu próprio sistema de controle de estoque web. com cadastro de produtos, categorias, fornecedores, entradas e saídas de produtos, com relatórios por data, margem de lucro e muito mais. Código simples e fácil de modificar. Acompanha instruções para instalação e criação do banco de dados MySQL. Clique aqui e saiba mais

Linguagens Mais Populares

1º lugar: Java
2º lugar: Python
3º lugar: C#
4º lugar: PHP
5º lugar: Delphi
6º lugar: C
7º lugar: JavaScript
8º lugar: C++
9º lugar: VB.NET
10º lugar: Ruby



© 2024 Arquivo de Códigos - Todos os direitos reservados
Neste momento há 40 usuários muito felizes estudando em nosso site.