Função Str

A função Str converte o conteúdo das variáveis numa cadeia de caracteres. Aceita valores numéricos, datas, cadeias de caracteres e valores monetários.

Os números não negativos são precedidos por um espaço em branco. Os números negativos são precedidos por um sinal de menos.

No caso dos valores numéricos, a cadeia de caracteres devolvida pela função Str é independente da configuração regional. Por conseguinte, o ponto é utilizado como separador decimal sempre que necessário.

Se for passado um cadeia de caracteres como argumento, esta é devolvida sem quaisquer alterações.

As datas são convertidas em cadeias de caracteres dependentes da configuração regional.

Sintaxe:


    Str (Valor como variante)

Tipo de retorno:

String

Parâmetros:

Valor: Qualquer valor a converter numa cadeia de caracteres.

Códigos de erro

5 Chamada de procedimento inválido

Exemplo:

Seguem-se alguns exemplos numéricos que utilizam a função Str.


    Sub ExampleStr_1
        ' Repare no espaço em branco no início das cadeias de caracteres devolvidas
        MsgBox Str(10) ' " 10"
        MsgBox Str(10.5) ' " 10.5"
        MsgBox Str(-12345 + 1.3) ' "-12346.3"
        MsgBox Str(10000 / 3) '  " 3333.33333333333"
        ' As cadeias de caracteres passadas como argumentos permanecem inalteradas
        MsgBox Str("A123") ' "A123"
    End Sub

Utilize a função LTrim para remover o espaço em branco no início da cadeia de caracteres devolvida.


    Sub ExampleStr_2
        MsgBox Str(10.5) ' " 10.5"
        MsgBox LTrim(Str(10.5)) ' "10.5"
    End Sub

A função Str também pode processar variáveis Date.


    Sub ExampleStr_3
        Dim aDate as Date, aTime as Date
        aDate = DateSerial(2021, 12, 20)
        aTime = TimeSerial(10, 20, 45)
        Print Str(aDate) ' "12/20/2021"
        Print Str(aTime) ' "10:20:45"
    End sub

Função Val