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

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

机房收费系统之实时错误‘94’无效使用null值_第1张图片

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

机房收费系统之实时错误‘94’无效使用null值_第2张图片

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

机房收费系统之实时错误‘94’无效使用null值_第3张图片

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

<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


你可能感兴趣的:(数据库,vb,机房收费系统,实时错误94无效使用null值,MSHFlexGrid)