NUNCA MAIS PASSE RAIVA POR NÃO CONSEGUIR RESOLVER UM PROBLEMA COM O EXCEL - GARANTIDO!

UNIVERSIDADE DO VBA - Domine o VBA no Excel Criando Sistemas Completos - Passo a Passo - CLIQUE AQUI

Você está em: PrincipalArtigos › ASP 3.0 › Capítulo 03 : 03
Quer receber novidades e e-books gratuitos?
« Lição anterior Δ Página principal ¤ Capítulos Próxima lição »
SITES DINÂMICOS COM ASP 3.0 - CURSO COMPLETO
Autor: Júlio Battisti


Promoção: Livro Windows Server 2012 R2 e Active Directory - Curso Completo, 2100 Páginas. Tudo para você se tornar um administrador de redes altamente qualificado para o mercado de trabalho e levar a sua carreira para o próximo nível!

Promoção: Livro Windows Server 2012 R2 e Active Directory

Curso Completo, 2100 páginas.

Tudo para você se tornar um administrador de redes altamente qualificado para o mercado de trabalho e levar a sua carreira para o próximo nível!

MAIS DETALHES | COMPRAR ESTE LIVRO


Lição 023 - Capítulo 03 - Outras funções do VBScript - Tratamento de String, Datas e Funções matemáticas

Neste item, aprenderemos a utilizar as principais funções do VBScript. Apresentaremos as funções divididas em categorias, conforme a funcionalidade das mesmas. Estaremos tratando das seguintes categorias:

  • Funções para manipulação de String.
  • Funções para manipulação de Data/Hora.
  • Funções matemáticas.

Para uma referência completa sobre todas as funções do VBScript, você pode consultar o seguinte endereço: http://msdn.microsoft.com/scripting

Funções para tratamento de String

Veremos as principais funções para tratamento de String. Nos exemplos práticos, no final do capítulo, estaremos utilizando algumas destas funções.

Função Asc

A função Asc, retorna o valor numérico do código ASCII, para a primeira letra de uma String. Considere o exemplo:

Asc(“Ainda chovia”)

Este exemplo de uso da função retorna o valor 65, o qual é o código ASCII, para a letra A maiúscula. Caso fosse a letra a minúscula, o código retornado seria 97.

Função Chr

A função Chr(numero), recebe um número como parâmetro, e retorna o caracter ASCII, associado ao número passado como parâmetro. Considere o exemplo:

Chr(65)

Este exemplo de uso da função retorna o caracter A maiúsculo.

Até agora, utilizamos a função Chr em diversos exemplos. Utilizamos o Chr(13), para simular um ENTER, o que faz uma quebra de linha, nas mensagens montadas com o MsgBox.

Função Len

Esta função determina o tamanho da String que foi passada como parâmetro para a função. Considere o exemplo:

MsgBox Len(“Este é um exemplo de uso da função Len !!”)

Este exemplo de uso da função, retorna 41, conforme indicado na Figura 3.27:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.27 Exemplo de uso da função Len.

Função LCase

Esta função converte para minúsculas, a String que foi passada como parâmetro para a função. Considere o exemplo:

MsgBox Lcase(“ESTE É UM EXEMPLO DE USO DA FUNÇÃO LCASE!!”)

Este exemplo de uso da função, converte o parâmetro passado, para letras minúsculas, conforme indicado na Figura 3.28:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.28 Exemplo de uso da função LCase.

Função UCase

Esta função converte para maiúsculas, a String que foi passada como parâmetro para a função. Considere o exemplo:

MsgBox Lcase(“este é um exemplo do uso da função ucase !!”)

Este exemplo de uso da função, converte o parâmetro passado, para letras maiúsculas, conforme indicado na Figura 3.29:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.29 Exemplo de uso da função UCase.

Função Left

Esta função retorna um número especificado de caracteres, a partir do início (Left – Esquerda) de uma String. É importante salientar que espaços em branco também devem ser considerados.

O formato geral da função é o seguinte:

Left(String, n) onde n é o número de caracteres a retornar.

Considere o exemplo:

MsgBox Left(“Júlio Cesar Fabris Battisti”,5)

Este exemplo de uso da função, retorna as cinco primeiras letras da String passada, neste caso, retornará Júlio.

Vamos alterar um pouco o nosso exemplo:

MsgBox Left(“Júlio Cesar Fabris Battisti”,7)

Irá retornar: Júlio C

Observe que o espaço em branco também é considerado.

Função Right

Esta função retorna um número especificado de caracteres, a partir do final (Right – Direita) de uma String. É importante salientar que espaços em branco também devem ser considerados.

O formato geral da função é o seguinte:

Right(String, n) onde n é o número de caracteres a retornar.

Considere o exemplo:

MsgBox Right(“Júlio Cesar Fabris Battisti”,6)

Este exemplo de uso da função, retorna as seis ultimas letras da String passada, neste caso, retornará “ttisti”.

Vamos alterar um pouco o nosso exemplo:

MsgBox Right(“Júlio Cesar Fabris Battisti”,10)

Irá retornar: s Battisti

Observe que o espaço em branco também é considerado.

Função Mid.

Esta função retorna um número especificado de caracteres, a partir de uma posição especificada, dentro da String. É importante salientar que espaços em branco também devem ser considerados.

O formato geral da função é o seguinte:

Mid(String, posicao_inicio, n) onde posicao_inicio é a posição a partir da qual devem ser retornados caracteres, e n é o número de caracteres a retornar.

Considere alguns exemplos:

Mid(“Júlio Cesar Fabris Battisti”,7,5)

Este exemplo de uso da função, retorna, a partir da posição 7, 5 caracteres, neste caso, retornará Cesar.

Mid(“SANTA MARIA”,3,7) , irá retornar NTA MAR. Observe que o espaço em branco também é considerado.

Um detalhe interessante, é que podemos utilizar o retorno de uma função, como parâmetro para outra função. Considere o seguinte exemplo:

LCase(Mid(“SANTA MARIA”,3,7))

Este exemplo retorna nta mar.

A função Mid retira os caracteres NTA MAR, os quais são passados como parâmetros para a função LCase, a qual converte os caracteres para minúsculos.

Função String

Esta função retorna um determinado caracter, um número especificado de vezes.

O formato geral da função é o seguinte:

String(n, Caracter) onde n é o número de vezes que Caractere deve ser repitido.

Considere o exemplo:

MsgBox String(35,”*”)

A Figura 3.30, mostra o resultado deste comando:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.30 Exemplo de uso da função String.

Funções para tratamento de Data e Hora

Veremos as principais funções para tratamento de Data e Hora. Nos exemplos práticos, no final do capítulo, estaremos utilizando algumas destas funções.

Função Date

Retorna a data corrente do sistema. Não precisamos passar parâmetros para esta função. Considere o exemplo abaixo:

MsgBox “Data do Sistema: “ & Date( )

O resultado deste comando, está indicado na Figura 3.31:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.32 Exemplo de uso da função Date.

Função Time

Retorna a hora corrente do sistema. Não precisamos passar parâmetros para esta função. Considere o exemplo abaixo:

MsgBox “Hora do Sistema: “ & Time( )

O resultado deste comando, está indicado na Figura 3.32:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.32 Exemplo de uso da função Time.

Função Day

Recebe como parâmetro uma data, e retorna um número entre 1 e 31, indicando o dia do mês. O formato geral é o seguinte:

Day(data)

Considere o exemplo abaixo:

MsgBox “Dia do mês: “ & Day(Date( ))

O resultado deste comando, está indicado na Figura 3.33:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.33 Exemplo de uso da função Day.

A função Date( ) captura a data do sistema e passa como parâmetro para a função Day, a qual por sua vez, retorna apenas o dia do mês.

Função Month

Recebe como parâmetro uma data, e retorna um número entre 1 e 12, indicando o mês do ano. O formato geral é o seguinte:

Month(data)

Considere o exemplo abaixo:

MsgBox “Mês do ano: “ & Month(Date( ))

O resultado deste comando, está indicado na Figura 3.34:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.34 Exemplo de uso da função Month.

A função Date( ) captura a data do sistema e passa como parâmetro para a função Month, a qual por sua vez, retorna apenas o mês do ano

Função Now

Retorna a hora  e a data corrente do sistema. Não precisamos passar parâmetros para esta função. Considere o exemplo abaixo:

MsgBox “Data e Hora do Sistema: “ & Now()

O resultado deste comando, está indicado na Figura 3.35:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.35 Exemplo de uso da função Now.

Função MonthName

Recebe como parâmetro um número, indicativo do mês do ano (1 – Janeiro, 2 – Fevereiro, e assim por diante), e um segundo parâmetro que pode ser Verdadeiro ou Falso. Se o segundo parâmetro for verdadeiro, o nome do mês será exibido abreviadamente. O formato geral é o seguinte:

MonthName(número_do_mês, abreviar)

Considere o exemplo abaixo:

MsgBox “Mês do ano: “ & MonthName(Month(Date(),False)

O resultado deste comando, está indicado na Figura 3.36:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.36 Exemplo de uso da função MonthName.

A função Date( ) captura a data do sistema e passa como parâmetro para a função Month. A função Month retorna o número do mês retornado pela data. Este número é passado como primeiro parâmetro para a função MonthName. O segundo parâmetro é definido em Falso, o que significa que é para exibir o nome do mês por extenso, isto é, não abreviado.

Função Hour

Recebe como parâmetro uma hora, e retorna um número entre 0 e 23, indicando o hora do dia. O formato geral é o seguinte:

Hour(horário)

Considere o exemplo abaixo:

MsgBox “Hora do dia: “ & Hour(Time( ))

O resultado deste comando, está indicado na Figura 3.37:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.37 Exemplo de uso da função Hour.

A função Time( ) captura a hora do sistema e passa como parâmetro para a função Hour, a qual por sua vez, retorna apenas o hora do dia.

A função DateDiff

Esta função pode ser utilizada para determinar o número de intervalos (em dias, trimestres, semestres, anos, etc), entre duas datas. A sintaxe desta função é o seguinte:

DateDiff(intervalo, data1, data2)

O parâmetro intervalo é uma String que diz que tipo de intervalo vamos calcular. Por exemplo, é este parâmetro que define se queremos calcular o número de dias, ou o número de meses entre duas datas. Na Tabela 3.2, temos os valores possíveis para o parâmetro intervalo.

Valor Descrição
yyyy Anos
q Trimestres
m Meses
y Dias do ano
d Dias
w Semanas
ww Semanas do ano
h Horas
n Minutos
s Segundos

Tabela 3.2 Valores para o parâmetro intervalo.

A título de exemplo, vamos calcular o número de meses, desde o descobrimento do Brasil, até 31 de Dezembro de 1999. Para isso, utilizaríamos o seguinte comando:

MsgBox “Meses desde o descobrimento: “ & DateDiff(“m”,”22/04/1500”,”31/12/1999”)

O resultado deste comando, pode ser conferido na Figura 3.38:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.38 Exemplo de uso da função DateDiff.

Vamos modificar um pouco o nosso exemplo, e calcular o número de horas desde o descobrimento. Para isto, podemos utilizar o seguinte comando:

MsgBox “Meses desde o descobrimento: “ & DateDiff(“h”,”22/04/1500”,”31/12/1999”)

O resultado deste comando, pode ser conferido na Figura 3.39:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.39 O número aproximado de horas, desde o descobrimento do Brasil.

A função DateAdd

Esta função pode ser utilizada para determinar uma data futura, com base em uma data fornecida, o tipo de período a ser acrescentado (dias, meses, anos, etc), e o número de períodos a serem acrescentados. A sintaxe desta função é o seguinte:

DateAdd(intervalo, número_de_intervalos, data)

O parâmetro intervalo é uma String que diz que tipo de intervalo vamos acrescentar. Por exemplo, é este parâmetro que define se queremos acrescentar um número especificado de dias, meses, anos, etc. Na Tabela 3.3, temos os valores possíveis para o parâmetro intervalo.

Valor Descrição
yyyy Anos
q Trimestres
m Meses
y Dias do ano
d Dias
w Semanas
ww Semanas do ano
h Horas
n Minutos
s Segundos

Tabela 3.3 Valores para o parâmetro intervalo.

A título de exemplo, vamos calcular a data em que tivemos um período de 1000 meses, após o descobrimento do Brasil. Para isso, utilizaríamos o seguinte comando:

MsgBox “Mil meses após o descobrimento foi em :  “ & DateAdd(“m”,1000,”22/04/1500”)

O resultado deste comando, pode ser conferido na Figura 3.40:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.40 Exemplo de uso da função DateAdd.

Vamos modificar um pouco o nosso exemplo, e calcular em que data teremos passado um milhão de dias após o descobrimento.

MsgBox “Um milhão de dias após o descobrimento em : “ & DateAdd(“d”,1000000,”22/04/1500”)

O resultado deste comando, pode ser conferido na Figura 3.41:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.41 Em 19/03/4238, o Brasil completará um milhão de dias.

Função Year

Recebe como parâmetro uma data, e retorna um número indicativo do ano. O formato geral é o seguinte:

Year(data)

Considere o exemplo abaixo:

MsgBox “Ano atual: “ & Year(Date( ))

O resultado deste comando, está indicado na Figura 4.42:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.42 Exemplo de uso da função Year.

A função Date( ) captura a data do sistema e passa como parâmetro para a função Year, a qual por sua vez, retorna apenas o ano.

Função WeekDay

Recebe como parâmetros uma data, e um parâmetro opcional, que indica qual o primeiro dia da semana. Se este parâmetro for omitido, o primeiro dia da semana será considerado Domingo. O valor para o primeiro dia da semana é numérico: 1 – Domingo, 2 – Segunda-feira, e assim por diante.

WeekDay(data, prim_dia_semana.)

Considere o exemplo abaixo:

MsgBox “Dia da semana: “ & WeekDay(“31/12/1999”)

O resultado deste comando, está indicado na Figura 3.43:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.43 Exemplo de uso da função WeekDay.

O valor 6, indica que foi uma Sexta-feira, o que confere com o calendário.

Poderíamos determinar que o primeiro dia da semana é a Segunda-feira (2). Com isso o nosso exemplo, ficaria assim:

MsgBox “Dia da semana: “ & WeekDay(“31/12/1999”,2)

O resultado deste comando, está indicado na Figura 3.44:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.44 Definindo a Segunda-feira, como o primeiro dia da semana.

O valor 5, indica que foi uma Sexta-feira, pois agora a Segunda-feira passou a ser o dia 1, a Terça-feira o dia 2, e assim por diante. Novamente confere com o calendário.

Função WeekDayName

Recebe como parâmetro um número, indicativo do dia da semana, e um segundo parâmetro que pode ser Verdadeiro ou Falso. Se o segundo parâmetro for verdadeiro, o nome do dia da semana será exibido abreviadamente. O formato geral é o seguinte:

WeekDayName(número_do_dia, abreviar)

Considere o exemplo abaixo:

MsgBox “Dia da semana: “ & WeekDayName(6,False)

O resultado deste comando, está indicado na Figura 3.45:

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 3.45 Exemplo de uso da função WeekDayName.

Funções para Cálculos matemáticos

Veremos as principais funções para efetuar cálculos matemáticos. Nos exemplos práticos, no final do capítulo, estaremos utilizando algumas destas funções.

Na Tabela 3.4, temos a descrição das principais funções matemáticas, disponíveis no VBScript.

Função Descrição
Abs(n) Retorna o valor absoluto (sem sinal), do número n
Atn(n) Retorna o valor do arco, cuja tangente é o número n. O número n deve ser fornecido em radianos
Cos(n) Retorna o coseno do número n. O número n deve ser fornecido em radianos
Exp(n) Retorna o número e (logaritmo neperiano e=2,7183), elevado no número n
Log(n) Retorna o logaritmo natural de um número n
Rnd(n) Retorna um número aleatório entre 0 e 1
Sgn(n) Retorna um número inteiro, indicando o sinal do número n. Retorna –1 para números negativos e 1 para números positivos
Sin(n) Retorna o seno do número n. O número n deve ser fornecido em radianos
Sqr(n) Retorna a Raiz quadrada do número n
Tan(n) Retorna a tangente do número n. O número n deve ser fornecido em radianos

Tabela 3.4 Funções para cálculos matemáticos.

Para converter graus para radianos, multiplique o valor em graus por pi (3.14), e divida o resultado por 180.

Na Tabela 3.5, temos alguns exemplos de utilização das funções matemáticas do VBScript.

Exemplo Valor de retorno
Abs(-2350) 2350
Atn(2) 1,1071487177
Cos(0) 1
Exp(1) 2,71828182845905
Log(1000) 6,90775527898214
Rnd*10 Gera um número aleatório entre 0 e 10
Sgn(-235) -1, pois o número é negativo
Sin(0) 0
Sqr(400) 20
Tan(0) 0

Tabela 3.5 Alguns exemplos de utilização das funções matemáticas

Com isso, encerramos a apresentação das principais funções do VBScript. Para uma referência completa, você pode consultar o site msdn.microsoft.com/scripting , ou os CD’s da assinatura do MSDN (Microsoft Developer Network). Junto com o Visual Studio 6.0, é fornecida uma cópia do MSDN.


Promoção: Livro Windows Server 2012 R2 e Active Directory - Curso Completo, 2100 Páginas. Tudo para você se tornar um administrador de redes altamente qualificado para o mercado de trabalho e levar a sua carreira para o próximo nível!

Promoção: Livro Windows Server 2012 R2 e Active Directory

Curso Completo, 2100 páginas.

Tudo para você se tornar um administrador de redes altamente qualificado para o mercado de trabalho e levar a sua carreira para o próximo nível!

MAIS DETALHES | COMPRAR ESTE LIVRO


« Lição anterior Δ Página principal ¤ Capítulos Próxima lição »
Quer receber novidades e e-books gratuitos?

Cursos Online

  • Banco de Dados
  • Carreira
  • Criação/Web
  • Excel/Projetos
  • Formação
  • + Todas as categorias
  • Contato: Telefone: (51) 3717-3796 | E-mail: webmaster@juliobattisti.com.br | Whatsapp: (51) 99627-3434

    Júlio Battisti Livros e Cursos Ltda | CNPJ: 08.916.484/0001-25 | Rua Vereador Ivo Cláudio Weigel, 537 - Universitário, Santa Cruz do Sul/RS, CEP: 96816-208

    Todos os direitos reservados, Júlio Battisti 2001-2019 ®

    [LIVRO]: MACROS E PROGRAMAÇÃO VBA NO EXCEL 2010 - PASSO-A-PASSO

    APRENDA COM JULIO BATTISTI - 1124 PÁGINAS: CLIQUE AQUI