空字段和空值（Basic 语法）

erina.pan

一般情况下，Crystal Reports 在公式中遇到空值字段时，会立即停止公式求值而不产生任何值。若要处理公式中的空字段值，则必须使用专门用于处理空字段值的特殊函数进行显式处理。这些函数包括：IsNull、PreviousIsNull 或 NextIsNull。
当 Crystal Reports 对以下条件求值时，运算符与这些函数相关：
IsNull({Product.Color}) Or _
InStr({Product.Color}, " ") = 0
它首先对 IsNull ({产品.颜色}) 求值，当它确定该函数值为“真”时，便知道整个条件为“真”，因此不需要检查是否
InStr({Product.Color}, " ") = 0
换句话说，当 Crystal Reports 能够预知整个表达式的结果时，将停止对布尔表达式求值。在下例中，公式防止在分母为 0 的情况下被零除：
Dim num As Number, denom As Number
...
If denom <> 0 And num / denom > 5 Then
...
注意   Visual Basic 不支持该技术，因为在 Visual Basic 中即使不必要，也对布尔表达式的所有部分求值。
示例
{产品.颜色} 字段中既包含基本颜色名（如“red”和“black”），也包含两个单词构成的描述性颜色名（如“steel satin”和“jewel green”）。以下的示例是这样一个公式，当颜色为基本颜色时写出“基本”，为其他颜色时写出“流行”。
If InStr({Product.Color}, " ") = 0 Then
    formula = "basic"
Else
    formula = "fancy"
End If
对 InStr 的函数调用搜索 {产品.颜色} 字符串中是否有空格。如果发现有空格，则该函数调用返回该空格的位置，否则返回 0。由于基本颜色只有一个单词，没有空格，所以 InStr 会对基本颜色返回 0。
对于某些产品（如 Guardian Chain Lock）不记录颜色值，因而 {产品.颜色} 字段在数据库中对该记录有一个空值。这样，Guardian Chain Lock 记录就不在它旁边打印任何文字。
下例说明如何处理上面使用 IsNull 的示例：
If IsNull({Product.Color}) Or _
   InStr({Product.Color}, " ") = 0 Then
   formula = "basic"
Else
   formula = "fancy"
End If