机房收费系统之实时错误‘94’无效使用null值

来源:互联网 发布:淘宝卖家能知道买家 编辑:程序博客网 时间:2024/06/17 05:16

  在运行组合查询的时候,报错:实时错误‘94’无效使用null值,如下:


   点击调试,下面所示的代码被黄条标示:


  所以,只好区查询了数据库的worklog表,但是显示的是允许空值的,那么为什么还说是无效使用呢,难道是使用方法不对?(这点还望指点)


  度娘说:解决办法是忽略不计,只需要在代码的后边加上 & “”就可以了 ,我尝试了一下,它果然没有欺骗善良的我,故作此文以表感激涕零之情~~~ 

<span style="white-space:pre"></span>txtSQL = "select * from worklog_Info"    Set mrc = ExecuteSQL(txtSQL, MsgText)    With MSHFlexGrid1        .Rows = 1        .CellAlignment = 4        .TextMatrix(0, 0) = "序列号"        .TextMatrix(0, 1) = "教师"        .TextMatrix(0, 2) = "级别"        .TextMatrix(0, 3) = "注册日期"        .TextMatrix(0, 4) = "注册时间"        .TextMatrix(0, 5) = "注销日期"        .TextMatrix(0, 6) = "注销时间"        .TextMatrix(0, 7) = "机器名"        .TextMatrix(0, 8) = "状态"        Do While Not mrc.EOF           .Rows = .Rows + 1           .CellAlignment = 4            .TextMatrix(.Rows - 1, 0) = mrc.Fields(0)            .TextMatrix(.Rows - 1, 1) = mrc.Fields(1)            .TextMatrix(.Rows - 1, 2) = mrc.Fields(2)            .TextMatrix(.Rows - 1, 3) = mrc.Fields(3)            .TextMatrix(.Rows - 1, 4) = mrc.Fields(4)            .TextMatrix(.Rows - 1, 5) = mrc.Fields(5) & ""            .TextMatrix(.Rows - 1, 6) = mrc.Fields(6) & ""            .TextMatrix(.Rows - 1, 7) = mrc.Fields(7)            .TextMatrix(.Rows - 1, 8) = mrc.Fields(8) '显示True或是False             mrc.MoveNext        Loop


0 0
原创粉丝点击