求助有关测试输入值的问题

嚣张气焰

我想对窗体中的文本框和复选框中的值进行测试，是不是可以用ＮＺ（）函数．

该二个文本框值分别是日期型，数值型，复选框值是逻辑型．

我在测试过程中什么都不输入的话会产生出错，内容是＂无法使用ＮＵＬＬ＂

程序如下：

　Dim a As Date

    Dim b As Single

    Dim c As Boolean

    a = Me.开始日期

    b = Me.金额

    c = Me.是否可用

    If Nz(a) = "" Then

   　　 Debug.Print "a"; Nz(a)

    End If

    If Nz(b) = "" Then

   　　 Debug.Print "b"; Nz(b)

    End If

    If Nz(c) = "" Then

     　   Debug.Print "c"; Nz(c)

    Else

    Debug.Print "kkkkkkkkkkkkkk"

    End If

我想可能是我测试用的方法不对

请高手帮助

zhengjialon

nz不是这样用的，建议去帮助里看一下NZ的定义：），达到你的目的，要改成以下：Nz(a) = "" 要换成：isnull(a) or trim(a) = "" 其它类推。

嚣张气焰

使用 Nz 函数可以返回 0，或一个空字符串（" "） ，或者当一个 Variant 为 Null 时，该函数返回其他的指定值。例如，您可以使用该函数将 Null 值转换为其他值并防止它通过表达式扩散。语法Nz(variant[, valueifnull])在定义中VARIANT可以是任何数据类型.那我为何不能使用呢?我不太清楚NZ的使用规则.看了VB帮助也不知道为什么,请版主指点.后来我在程序参数定义时把Dim a As Date

    Dim b As Single

    Dim c As Boolean都改为dim adim bdim c运行时却成功了.我不知道错在什么地方.HELP~~~~~~~~~~~~~~~~~~

Benjamin_luk

Dim a As DateDim b As Single

声明变量之后, A 为日期型, B 为数字, 所以不能为空值. 你可以用默认值来避免以上的问题