1. 程式人生 > >機房收費系統——“94”錯誤 無效Null值

機房收費系統——“94”錯誤 無效Null值

在機房系統中的操作員工作記錄窗體中會有空值,在查詢資料時會出現”94”錯誤,如下圖。因為VB6是不允許給變數輔助為Null的,那怎麼解決這個問題呢?

這裡寫圖片描述

在會出現空值的欄位程式碼後加上 ’ &“” ’ 即可。在值為null時顯示“ ”.

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) mrc.MoveNext Loop