Mostrar tudo

Ocultar tudo

Pode utilizar a função Nz para devolver zero, uma cadeia de comprimento zero (cadeia de comprimento zero: cadeia que não contém caracteres. É possível utilizar uma cadeia de comprimento zero para indicar que tem conhecimento de que um determinado campo não tem qualquer valor. Para introduzir uma cadeia de comprimento zero, escreva duas aspas sem qualquer espaço entre ambas ("").) (" ") ou outro valor especificado quando uma Variante (tipo de dados Variante: tipo de dados predefinido para variáveis que não possuem caracteres de declaração de tipo quando uma instrução do tipo Def não está em vigor. Uma Variante pode armazenar dados numéricos, de cadeia, de data/hora, Nulo ou Vazio.) é Nula (Null: valor que pode introduzir num campo ou utilizar em expressões ou consultas para indicar dados em falta ou desconhecidos. No Visual Basic, a palavra-chave Null indica um valor nulo (Null). Alguns campos, como campos de chave primária, não podem conter Null.). Por exemplo, pode utilizar esta função para converter um valor Nulo noutro valor e impedir que o mesmo se propague numa expressão.

Sintaxe

Nz(variante [, valorsenulo ] )

A sintaxe da função Nz tem os seguintes argumentos:

Se o valor do argumento da variante for Nulo, a função Nz devolve o número zero ou uma cadeia de comprimento zero (devolve sempre uma cadeia de comprimento zero quando é utilizada numa expressão da consulta), dependendo se o contexto indica que o valor deve ser um número ou uma cadeia. Se o argumento opcional valorsenulo for incluído, a função Nz devolverá o valor especificado pelo argumento, se o argumento da variante for Nulo. Quando é utilizada numa expressão da consulta, a função NZ deve sempre incluir o argumento valorsenulo,

Se o valor da variante não for Nulo, a função Nz devolve o valor da variante.

Observações

A função Nz é útil para as expressões que possam incluir valores Nulos. Para forçar uma expressão a avaliar um valor não Nulo, mesmo quando contém um valor Nulo, utilize a função Nz para devolver zero, uma cadeia de comprimento zero ou um valor devolvido personalizado.

Por exemplo, a expressão 2 + varX devolverá sempre um valor Nulo quando a Variante varX for Nula. No entanto, 2 + Nz(varX) devolve 2.

Pode utilizar muitas vezes a função Nz como uma alternativa para a função Ise. Por exemplo, no código que se segue, são necessárias duas expressões que incluam a função Ise para devolver o resultado pretendido. A primeira expressão que inclui a função Ise é utilizada para verificar o valor de uma variável e convertê-lo para zero se for Nulo.

varTemp = IIf(IsNull(varFreight), 0, varFreight)
varResult = IIf(varTemp > 50, "High", "Low")
		

No exemplo que se segue, a função Nz fornece a mesma funcionalidade que a primeira expressão e o resultado pretendido é obtido num passo e não em dois.

varResult = IIf(Nz(varFreight) > 50, "High", "Low")
		

Se fornecer um valor para o argumento opcional valorsenulo, esse valor será devolvido quando a variante for Nula. Ao incluir este argumento opcional, poderá evitar a utilização de uma expressão que contenha a função Ise. Por exemplo, a seguinte expressão utiliza a função Ise para devolver uma cadeia se o valor de varFreight for Nulo.

varResult = IIf(IsNull(varFreight), _
    "No Freight Charge", varFreight)
		

No exemplo que se segue, o argumento opcional fornecido à função Nz fornece a cadeia a ser devolvida se varFreight for Nulo.

varResult = Nz(varFreight, "No Freight Charge")
		

Exemplo

 Nota   Os exemplos que se seguem demonstram a utilização desta função num módulo do Visual Basic for Applications (VBA). Para mais informações sobre como trabalhar com VBA, seleccione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de procura.

O exemplo que se segue avalia um controlo num formulário e devolve uma de duas cadeias com base no valor do controlo. Se o valor do controlo for Nulo, o procedimento utiliza a função Nz para converter um valor Nulo para uma cadeia de comprimento zero.

Public Sub CheckValue()

    Dim frm As Form
    Dim ctl As Control
    Dim varResult As Variant

    ' Return Form object variable 
    ' pointing to Orders form.
    Set frm = Forms!Orders

    ' Return Control object variable 
    ' pointing to ShipRegion.
    Set ctl = frm!ShipRegion

    ' Choose result based on value of control.
    varResult = IIf(Nz(ctl.Value) = vbNullString, _
        "No value.", "Value is " & ctl.Value & ".")

    ' Display result.
    MsgBox varResult, vbExclamation

End Sub