Como usar funções matemáticos, funções de conversão de tipo e funções de seqüência de caracteres no Visual Basic .NET ou no Visual Basic 2005

IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 818805
Sumário
Este artigo passo a passo descreve como usar funções matemáticos, funções de conversão de tipo e seqüência de funções que são definidas no Visual Basic .NET ou Visual Basic 2005.

back to the top

Usar funções de matemática

As funções que são usadas para cálculos matemáticos são definidas na classe ' System.Math . A classe de matemática inclui funções trigonométricas, logarítmicas funções e outras funções de matemáticas comuns. As funções seguintes são as funções que são definidas na classe Math do namespace System.

Observação Para usar essas funções, importe o namespace System.Math para seu projeto, adicionando o seguinte código à parte superior do código-fonte:
Imports System.Math
ABS

A função ABS retorna o valor absoluto do número especificado.

ABS exemplo:

Este exemplo usa o método ABS do Math classe para calcular o valor absoluto de um número.
' Code will not compile unless it is put in a Sub or in a Function.Dim MyNumber As DoubleMyNumber = Abs(50.3)    ' Returns 50.3.MyNumber = Abs(-50.3)   ' Returns 50.3.
ATAN

A função ATAN retorna um valor duplo que contém o ângulo. A tangente do ângulo é o número especificado. Um valor de retorno positivo representa um ângulo no sentido anti-horário do eixo x. Um valor de retorno negativo representa um ângulo no sentido horário. Multiplique o valor de retorno por 180 dividido por pi (π) para converter de radianos em graus.

ATAN exemplo:

Este exemplo usa o ATAN método da classe matemática para calcular o valor de pi.
' Code is not compiled unless it is put in a Sub or in a Function.Dim pi As Doublepi = 4 * Atan(1)   ' Calculate the value of pi.
cos

A função cos pega um ângulo em radianos como um argumento e, em seguida, retorna um valor duplo, que é o cosseno do ângulo especificado.

cos exemplo:

Este exemplo usa o método cos da classe matemática para retornar o cosseno de um ângulo.
' Code is not compiled unless it is put in a Sub or in a Function.Dim MyAngle, MySecant As DoubleMyAngle = 1.3   ' Define angle in radians.MySecant = 1 / Cos(MyAngle)   ' Calculate secant.
Exp

A função Exp retorna um valor duplo que contém e (a base dos logaritmos naturais elevado à potência especificada). Use o método pronto para calcular as potências das outras bases. Exp é o inverso de log .

Exp exemplo:

Este exemplo usa o método Exp de matemática de classe para retornar e elevado a uma potência.
' Code is not compiled unless it is put in a Sub or in a Function.Dim MyAngle, MyHSin As Double' Define angle in radians.MyAngle = 1.3   ' Calculate hyperbolic sine.MyHSin = (Exp(MyAngle) - Exp(-1 * MyAngle)) / 2
log

Função log retorna um valor duplo que contém o logaritmo de um número especificado. Esse método é sobrecarregado e pode retornar qualquer o natural (base e) logaritmo de um número especificado ou o logaritmo de um número especificado em uma base especificada.

exemplo de log :

Este exemplo usa o método de log da classe matemática para retornar o logaritmo natural de um número.
' Code is not compiled unless it is put in a Sub or in a Function.Dim MyAngle, MyLog As Double' Define angle in radians.MyAngle = 1.3' Calculate inverse hyperbolic sine.MyLog = Log(MyAngle + Sqrt(MyAngle * MyAngle + 1))
redondo

A função ARRED retorna um valor duplo que contém o número que está mais próximo o valor especificado. Funções redondo adicionais estão disponíveis como métodos dos tipos intrínsecos, como o método Decimal.Round .

Arredondar exemplo:

Este exemplo usa o método redonda da classe matemática para arredondar um número para o inteiro mais próximo.
' Code is not compiled unless it is put in a Sub or in a Function.Dim MyVar1 As Double = 2.8Dim MyVar2 As DoubleMyVar2 =Round(MyVar1)   ' Returns 3.
sinal

A função Sign retornará um valor inteiro que indica o sinal de um número. A tabela a seguir mostra os argumentos de entrada da função e dos valores de retorno:
Número especificadoValor de retorno
Positivo1
Negativo-1
Zero0

exemplo de sinal :

Este exemplo usa o método Sign da classe matemática para determinar o sinal de um número.
' Code is not compiled unless it is put in a Sub or in a Function.Dim MyVar1, MyVar2, MyVar3 As DoubleDim MySign As IntegerMyVar1 = 12MyVar2 = -2.4MyVar3 = 0MySign = Sign(MyVar1)   ' Returns 1.MySign = Sign(MyVar2)   ' Returns -1.MySign = Sign(MyVar3)   ' Returns 0.
sin

A função sin pega um ângulo em radianos como um argumento e retorna um valor Double que especifica o seno do ângulo.

sin exemplo:

Este exemplo usa o método sin da classe matemática para retornar o seno de um ângulo.
' Code is not compiled unless it is put in a Sub or in a Function.Dim MyAngle, MyCosecant As DoubleMyAngle = 1.3   ' Define angle in radians.MyCosecant = 1 / Sin(MyAngle)   ' Calculate cosecant.
SQRT

A função SQRT retornará um valor Double que especifica a raiz quadrada do número especificado.

exemplo de SQRT :

Este exemplo usa o método SQRT da classe matemática para calcular a raiz quadrada de um número.
' Code is not compiled unless it is put in a Sub or in a Function.Dim MySqr As DoubleMySqr = Sqrt(4)    ' Returns 2.MySqr = Sqrt(23)   ' Returns 4.79583152331272.MySqr = Sqrt(0)    ' Returns 0.MySqr = Sqrt(-4)   ' Returns NaN (not a number).
tan

A função tan retorna um valor duplo que contém a tangente do ângulo especificado. A função tan utiliza um ângulo é medido em radianos como o argumento. Quando o ângulo é especificado é NaN, NegativeInfinity ou PositiveInfinity, esse método retorna NaN.

Observação Multiplique por π/180 para converter graus em radianos.

tan exemplo:

Este exemplo usa o método tan da classe matemática para retornar a tangente de um ângulo.
' Code is not compiled unless it is put in a Sub or in a Function.Dim MyAngle, MyCotangent As DoubleMyAngle = 1.3   ' Define angle in radians.MyCotangent = 1 / Tan(MyAngle)   ' Calculate cotangent.
back to the top

Usar funções de conversão de tipo

O processo de alterar um valor de um tipo de dados para outro tipo de dados é chamado conversão. Conversões são expandir ou restringir, dependendo das capacidades de dados dos tipos envolvidos. Alargamento conversão e restringir conversão são suportados pelo common language runtime. Por exemplo, o valor é representado como um inteiro assinado de 32 bits pode ser convertido em um inteiro assinado de 64 bits. Esse é um exemplo de uma conversão de expansão. A conversão oposta (de 64 bits para 32 bits) é um exemplo de uma conversão de restrição. As informações nunca são perdidas como resultado de uma conversão de expansão. No entanto, informações podem ser perdidas como resultado de uma conversão de restrição.

As funções de conversão de tipo a seguir são definidas no Visual Basic .NET ou no Visual Basic 2005:

CBool

Função CBool é usada para converter expressões de seqüência de caracteres ou expressões numéricas para valores booleanos. Quando uma expressão for avaliada como um valor diferente de zero, a função CBool retorna True. Caso contrário, a função retornará False.

CBool exemplo:
Dim A, B, C As IntegerDim Check As BooleanA = 5B = 5Check = CBool(A = B)   ' Check is set to True.C = 0Check = CBool(C)   ' Check is set to False.
CByte

A função CByte converte um número especificado para um byte. O argumento de entrada deve ser um número entre 0 e 255. Caso contrário, você recebe um System.OverflowException.

CByte exemplo:
Dim MyDouble As DoubleDim MyByte As ByteMyDouble = 125.5678MyByte = CByte(MyDouble)   ' MyByte is set to 126.
CChar

A função CChar converte somente o primeiro caractere da seqüência especificada. O argumento de entrada para CChar deve ser uma seqüência de tipo de dados. Você não pode usar CChar para converter um número em um caractere porque CChar não pode aceitar um tipo de dados numéricos.

exemplo de CChar :

Este exemplo usa a função CChar para converter o primeiro caractere de uma expressão em seqüência para um tipo de caracteres.
Dim MyString As StringDim MyChar As CharMyString = "BCD"   ' CChar converts only the first character of the string.MyChar = CChar(MyString)   ' MyChar is set to "B".
CDATA

CDATA aceita qualquer representação válida de uma data e uma hora e em seguida, converte em uma data.

CDATA exemplo:

Este exemplo usa a função CDATA para converter cadeias de caracteres em valores de data.
Dim MyDateString, MyTimeString As StringDim MyDate, MyTime As DateMyDateString = "February 12, 1969"MyTimeString = "4:35:47 PM"' ...MyDate = CDate(MyDateString)   ' Convert to Date data type.MyTime = CDate(MyTimeString)   ' Convert to Date data type.
CDbl

A função CDbl é usada para converter uma expressão numérica em um valor duplo. O argumento de entrada da função deve estar entre - 4, 94065645841247E - 324 e - 1.79769313486231E + 308 para valores negativos. O argumento de entrada da função deve estar entre 1.79769313486231E + 308 e 4, 94065645841247E-324 para valores positivos.

CDbl exemplo:
Dim MyDec As DecimalDim MyDouble As DoubleMyDec = 234.456784D    ' Literal type character D makes MyDec a Decimal.MyDouble = CDbl(MyDec * 8.2D * 0.01D)   ' Convert result to a Double.
CDec

A função CDec converte um valor numérico em um decimal.

CDec exemplo:
Dim MyDouble As DoubleDim MyDecimal As DecimalMyDouble = 10000000.0587MyDecimal = CDec(MyDouble)   ' Convert to Decimal.
CInt

A função CInt converte um valor numérico em um número inteiro.

CInt exemplo:
Dim MyDouble As DoubleDim MyInt As IntegerMyDouble = 2345.5678MyInt = CInt(MyDouble)   ' MyInt is set to 2346.
CLng

A função CLng usa um valor numérico como um argumento e, em seguida, retorna um valor Long.

CLng exemplo:
Dim MyDbl1, MyDbl2 As DoubleDim MyLong1, MyLong2 As LongMyDbl1 = 25427.45MyDbl2 = 25427.55MyLong1 = CLng(MyDbl1)   ' MyLong1 contains 25427.MyLong2 = CLng(MyDbl2)   ' MyLong2 contains 25428.
CObj

A função CObj converte um valor numérico em um objeto.

exemplo de CObj :
Dim MyDouble As DoubleDim MyObject As ObjectMyDouble = 2.7182818284MyObject = CObj(MyDouble)   ' Double value is pointed to by MyObject.
CShort

A função CShort converte um valor numérico para curta.

exemplo CShort :
Dim MyByte as ByteDim MyShort as ShortMyByte = 100MyShort = CShort(MyByte)   ' Convert to Short.
CSng

A função CSng converte o valor numérico como Single.

CSng exemplo:
Dim MyDouble1, MyDouble2 As DoubleDim MySingle1, MySingle2 As SingleMyDouble1 = 75.3421105MyDouble2 = 75.3421567MySingle1 = CSng(MyDouble1)   ' MySingle1 is set to 75.34211.MySingle2 = CSng(MyDouble2)   ' MySingle2 is set to 75.34216.
CStr

A tabela a seguir mostra os argumentos de entrada e os valores de retorno da função CStr :
Tipo de dados de argumento entradaValor de retorno
BooleanoUma seqüência que contém True ou False
DataUma seqüência que contém um valor de data (data e hora) no formato data abreviada do sistema
Valor numéricoUma seqüência de caracteres que representa o número

exemplo de CStr :

Este exemplo usa a função CStr para converter um valor numérico em uma seqüência de caracteres.
Dim MyDouble As DoubleDim MyString As StringMyDouble = 437.324MyString = CStr(MyDouble)   ' MyString is set to "437.324".
back to the top

Usar funções de seqüência

As funções de seqüência são definidas em classes diferentes. As classes incluem a classe Microsoft.VisualBasic.Strings e a classe System.String .

back to the top

Usar funções de seqüência na classe Microsoft.VisualBasic.Strings

As funções seguintes são as funções de seqüência de caracteres definidas na classe Microsoft.VisualBasic.Strings .

Observação Para usar as funções de seqüência, importe o namespace Microsoft.VisualBasic.Strings para seu projeto, adicionando o seguinte código no início do código-fonte:
Imports Microsoft.VisualBasic.Strings
ASC e AscW

Função ASC e a função AscW retornam um valor inteiro que representa o código do caractere que corresponde ao caractere especificado. As funções aceitam qualquer expressão válida do caractere ou expressão de seqüência como um argumento. Quando uma seqüência de caracteres é o argumento de entrada, somente o primeiro caractere da seqüência de caracteres é usado para entrada. Quando a seqüência de caracteres contém caracteres, ocorrerá um erro de ArgumentException. crescente retorna o ponto de código ou o código do caractere de entrada. O valor de retorno pode estar entre 0 e 255 para valores de (SBCS) do conjunto de caracteres de byte único. O valor de retorno pode estar entre -32768 a 32767 para conjunto de caracteres de dois bytes (DBCS) valores. AscW retorna o ponto de código Unicode para o caractere de entrada pode estar entre 0 e 65535.

Exemplo:
Dim MyInt As IntegerMyInt = Asc("A")   ' MyInt is set to 65.MyInt = Asc("a")   ' MyInt is set to 97.MyInt = Asc("Apple")   ' MyInt is set to 65.	
Chr e ChrW

A função Chr e a função ChrW retornam o caractere que está associado com o código de caractere especificado. Quando CharCode está fora do intervalo de -32768 a 65535, ocorrerá um erro de ArgumentException.

Exemplo:

Este exemplo usa a função Chr para retornar o caractere que está associado com o código de caractere especificado.
Dim MyChar As CharMyChar = Chr(65)   ' Returns "A".MyChar = Chr(97)   ' Returns "a".MyChar = Chr(62)   ' Returns ">".MyChar = Chr(37)   ' Returns "%".
GetChar

A função GetChar retorna um valor de caracteres que representa o caractere do índice especificado na seqüência de caracteres especificado. Quando o índice é menor que 1 ou maior que o índice do último caractere no argumento de entrada especificado, ocorre uma ArgumentException.

Exemplo:

Este exemplo mostra como usar a função GetChar para retornar um caractere de um índice especificado em uma seqüência de caracteres.
Dim myString As String = "ABCDE"Dim myChar As CharmyChar = GetChar(myString, 4)   ' myChar = "D"
InStr

A função InStr retorna um número inteiro que especifica a posição inicial da primeira ocorrência de uma seqüência de caracteres que está em outra seqüência de caracteres.

Exemplo:

O exemplo a seguir utiliza a função InStr para retornar a posição da primeira ocorrência de uma seqüência de caracteres que está em outra seqüência:
Dim SearchString, SearchChar As StringDim MyPos As IntegerSearchString ="XXpXXpXXPXXP"   ' String to search in.SearchChar = "P"   ' Search for "P".' A textual comparison starting at position 4. Returns 6.MyPos = InStr(4, SearchString, SearchChar, CompareMethod.Text)   
ingressar

A função Join retorna uma seqüência que é criada unindo-subseqüências estão contidas em uma matriz. A matriz unidimensional que contém subseqüências devem estar associadas é passada como um argumento para a função de associação . A função usa delimitador de seqüência para separar subseqüências em seqüências de retornado como um argumento opcional. Quando o delimitador é omitido, o caractere de espaço ("") é usado como o separador entre as subseqüências. Quando o delimitador é uma seqüência de comprimento zero (""), subseqüências na matriz são concatenadas com não separadores.

Exemplo:

O exemplo a seguir mostra como usar a função de associação :
Dim myItem(2) As StringDim myShoppingList As StringmyItem(0) = "Pickle"myItem(1) = "Pineapple"myItem(2) = "Papaya"' Returns "Pickle, Pineapple, Papaya"myShoppingList = Join(myItem, ", ")
LCase

Função LCase retorna uma seqüência de caracteres ou um caractere que foi convertido para minúsculas. Somente letras maiúsculas são convertidas em minúsculas. Todas as letras minúsculas e caracteres sem letra continuam inalterados.

Exemplo:

O exemplo a seguir usa a função LCase para retornar uma versão de uma seqüência de caracteres em minúsculas:
Dim UpperCase, LowerCase As StringUppercase = "Hello WORLD 1234"   ' String to convert.Lowercase = LCase(UpperCase)   ' Returns "hello world 1234".
LTrim , RTrim e Trim

Essas funções retornam uma seqüência de caracteres que contém uma cópia de uma seqüência de caracteres especificada. Quando você usa LTrim , houver espaços à esquerda. Quando você usa RTrim , houver espaços à direita. Quando você usa o corte , há sem espaços à esquerda e sem espaços à direita.

Exemplo:

O exemplo a seguir usa a função LTrim para remover espaços à esquerda, espaços de função RTrim para remover à direita e o corte funcionar para remover espaços à esquerda e espaços à direita de uma variável String:
Dim MyString, TrimString As StringMyString = "  <-Trim->  "   ' Initializes string.TrimString = LTrim(MyString)   ' TrimString = "<-Trim->  ".TrimString = RTrim(MyString)   ' TrimString = "  <-Trim->".TrimString = LTrim(RTrim(MyString))   ' TrimString = "<-Trim->".' Using the Trim function alone achieves the same result.TrimString = Trim(MyString)   ' TrimString = "<-Trim->".
Substituir

Substituir função retorna uma seqüência de caracteres onde uma subseqüência especificada é substituída por outra subseqüência um número de vezes especificado. O valor de retorno da função Substituir é uma seqüência de caracteres que começa na posição que é especificada pelo argumento Iniciar e, em seguida, termina no final da seqüência de caracteres especificada com as substituições feitas como especificado pela valores do argumento Localizar e Substituir argumento.

Exemplo:

Este exemplo demonstra a Substituir função:
Dim myString As String = "Shopping List"Dim aString As String' Returns "Shipping List".aString = Replace(myString, "o", "i")
StrComp

A função SeqComp retornará -1, 0 ou 1. Isso se baseia o resultado de uma comparação de seqüência de caracteres. As seqüências de caracteres são comparadas por valores de classificação alfanumérica começando com o primeiro caractere.

Exemplo:

O exemplo a seguir usa a função SeqComp para retornar os resultados de uma comparação de seqüência de caracteres. Quando o terceiro argumento é omitido, o tipo de comparação que é definido na opção compare instrução ou os padrões de projeto é usado.
Dim MyStr1, MyStr2 As StringDim MyComp As IntegerMyStr1 = "ABCD" MyStr2 = "abcd"   ' Defines variables.' The two strings sort equally. Returns 0.MyComp = StrComp(MyStr1, MyStr2, CompareMethod.Text)' MyStr1 sorts after MyStr2. Returns -1.MyComp = StrComp(MyStr1, MyStr2, CompareMethod.Binary)' MyStr2 sorts before MyStr1. Returns 1.MyComp = StrComp(MyStr2, MyStr1)
StrConv

A função StrConv retorna uma seqüência de caracteres é convertida como especificada nos argumentos de entrada. A função StrConv converte a seqüência de caracteres. A conversão é baseada no valor no argumento de conversão . O valor no argumento de conversão é um membro da VbStrConv enumeração.

As configurações do argumento de conversão são:
Membro de enumeraçãoDescrição
VbStrConv.NoneNão realiza nenhuma conversão
VbStrConv.LinguisticCasing-Usa regras lingüísticas de maiúsculas e minúsculas em vez do sistema de arquivos (padrão)
-Válido com maiúsculas e minúsculas somente
VbStrConv.UpperCaseConverte a seqüência de caracteres maiúsculos
VbStrConv.LowerCaseConverte a seqüência de caracteres minúsculos
VbStrConv.ProperCaseConverte a primeira letra de cada palavra na seqüência de caracteres em maiúsculas

Exemplo:

O exemplo a seguir converte texto em letras minúsculas: sText
Dim sText, sNewText As StringsText = "Hello World"sNewText = StrConv(sText, VbStrConv.LowerCase)Debug.WriteLine (sNewText)   ' Outputs "hello world".
StrDup

A função StrDup retorna uma seqüência de caracteres ou um objeto que é composto do caractere especificado que é repetido o número de vezes especificado. StrDup função leva dois argumentos, o argumento de número e o argumento de caracteres . O argumento número da Especifica o período para a seqüência que deve ser retornado pela função. StrDup função usa somente o primeiro caractere no argumento de caracteres . O caractere argumento pode ser um tipo de dados de caracteres, um tipo de dados String ou um tipo de dados Object.

Exemplo:

O exemplo a seguir usa a função StrDup para retornar uma seqüência de caracteres duplicados:
Dim aString As String = "Wow! What a string!"Dim aObject As New Object()Dim myString As StringaObject = "This is a String that is contained in an Object"myString = StrDup(5, "P")   ' Returns "PPPPP"myString = StrDup(10, aString)   ' Returns "WWWWWWWWWW"myString = StrDup(6, aObject)   ' Returns "TTTTTT"
StrReverse

A função StrReverse retorna uma seqüência que tenha a ordem de caracteres de uma seqüência especificada revertida.

Exemplo:
Dim myString As String = "ABCDEFG"Dim revString As String' Returns "GFEDCBA".revString = StrReverse(myString)
UCase

A função UCase retorna uma seqüência de caracteres ou um caractere que contém a seqüência especificada é convertida em maiúsculas. Apenas letras minúsculas são convertidas em letras maiúsculas. Todas as letras maiúsculas letras e caracteres não-letra permanecem inalterados.

Exemplo:

A exemplo seguinte usa função UCase para retornar uma versão de uma seqüência de caracteres em maiúsculas:
Dim LowerCase, UpperCase As StringLowerCase = "Hello World 1234"   ' String to convert.UpperCase = UCase(LowerCase)   ' Returns "HELLO WORLD 1234".
back to the top

Usar funções de String na classe System.String

A seguir estão as funções String a seqüência de classe do Namespace System.

Observação Para usar as funções de seqüência, importe o System.String espaço para nome para seu projeto, adicionando o seguinte código para o início do código-fonte:
Imports System.String
Comparar

A função Comparar compara duas seqüências que estão nos argumentos de entrada. A comparação será executada usando as regras de classificação de palavra. A comparação termina quando uma desigualdade é descoberta ou ambas as seqüências de caracteres são comparadas.

Comparar exemplo:
' Code is not compiled unless it is put in a Sub or in a Function.Dim s1, s2 As Strings1 = "testexample"s2 = "testex"MsgBox(Compare(s2, s1)) 'Returns -1.MsgBox(Compare(s1, s2)) 'Returns 1.
concat

A função Concat concatena uma ou mais seqüências e retorna seqüência de caracteres concatenada.

Concat exemplo:

O exemplo a seguir mostra como usar versões sobrecarregadas dos Concat :
' Code is not compiled unless it is put in a Sub or in a Function.Dim s1, s2, sa(3) As Stringsa(0) = "A"sa(1) = "B"sa(2) = "C"s1 = "test"s2 = "example"s1 = Concat(s1, s2)  'Returns testexample.MsgBox(s1)MsgBox(Concat(sa)) 'Returns ABC.
cópia

A função de cópia copia o valor na seqüência de caracteres especificada para outra seqüência.

exemplo de cópia :
' Code is not compiled unless it is put in a Sub or in a Function.Dim s1, s2 As String       s1 = "Hello World"'Copy the string s1 to s2.s2 = Copy(s1)MsgBox(s2) 'Displays Hello World.
Remover

A função Remover exclui um número especificado de caracteres da seqüência de caracteres especificada, começando em uma posição especificada. Remover função tem dois parâmetros. Eles são o parâmetro StartIndex e o parâmetro de contagem . O parâmetro Startindex é a posição na seqüência que especifica onde iniciar a exclusão de caracteres. A contagem de parâmetro especifica o número de caracteres para excluir.

Remover exemplo:
' Code is not compiled unless it is put in a Sub or in a Function.Dim s1, s2 As String       s1 = "Hello World"'Removes 3 characters starting from character e.s2 = s1.Remove(1, 3)MsgBox(s2) 'Displays Ho World.

subseqüência de caracteres

A função da subseqüência de caracteres recupera uma seqüência começando na posição especificada na seqüência de caracteres especificada.

exemplo de subseqüência de caracteres :

O exemplo a seguir recupera uma subseqüência iniciando em uma posição de caractere especificado e com um comprimento especificado:
' Code is not compiled unless it is put in a Sub or in a Function.Dim s1, s2 As Strings1 = "Hello World"s2 = s1.Substring(6, 5) 'Returns World.MsgBox(s2) 'Displays World.
ToCharArray

A função ToCharArray copia os caracteres na seqüência de caracteres para uma matriz de caracteres Unicode.

exemplo de ToCharArray :

O exemplo a seguir copia caracteres em uma posição especificada para uma matriz de caracteres:
 ' Code is not compiled unless it is put in a Sub or in a Function.Dim s1 As StringDim ch(10) As Chars1 = "Hello World"'Copies the characters starting from W to d to a Character array.ch = s1.ToCharArray(6, 5)MsgBox(ch(3)) 'Displays l.
ToLower

A função ToLower usa um argumento de seqüência de caracteres e retorna uma cópia dessa seqüência de caracteres em letras minúsculas.

exemplo de ToLower :
' Code is not compiled unless it is put in a Sub or in a Function.Dim s1, s2 As Strings1 = "Hello World"s2 = s1.ToLower() 'Converts any uppercase characters to lowercase.MsgBox(s2) 'Displays hello world.
ToUpper

A função de ToUpper usa um argumento de seqüência de caracteres e retorna uma cópia dessa seqüência de caracteres em maiúsculas.

exemplo de ToUpper :
' Code is not compiled unless it is put in a Sub or in a Function.Dim s1, s2 As Strings1 = "Hello World"s2 = s1.ToUpper() 'Converts any lowercase characters to uppercase.MsgBox(s2) 'Displays HELLO WORLD.
Aparar , TrimStart e TrimEnd

Essas funções retornam uma seqüência de caracteres que contém uma cópia de uma seqüência de caracteres especificada. Quando você usa a função Trim , não há nenhum espaços à esquerda e sem espaços à direita. Quando você usa a função TrimStart , houver espaços à esquerda. Quando você usa a função TrimEnd , houver espaços à direita.

Exemplo:

O exemplo a seguir usa a função TrimStart para remover espaços no início, a função TrimEnd para remover espaços no final e a função Trim para remover espaços à esquerda e espaços à direita de uma seqüência de caracteres variável:
' Code is not compiled unless it is put in a Sub or in a Function.Dim s1, s2 As Strings1 = "   Hello World   "s2 = s1.Trim()      'Returns Hello World without any white spaces.s2 = s1.TrimStart   'Removes the spaces at the start.   s2 = s1.TrimEnd     'Removes the white spaces at the end.

back to the top
Referências
Para obter mais informações sobre funções, visite o seguinte site:

http://msdn2.microsoft.com/en-us/library/32s6akha(vs.71).aspx

back to the top

Aviso: este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 818805 - Última Revisão: 11/26/2007 05:41:20 - Revisão: 3.6

Microsoft Visual Basic 2005, Microsoft Visual Basic .NET 2003 Standard Edition, Microsoft Visual Basic .NET 2002 Standard Edition

  • kbmt kbvs2005swept kbvs2005applies kbconversion kbstring kbhowtomaster KB818805 KbMtpt
Comentários