.
.        
Set mrc = ExecuteSQL(txtSQL, MsgText)
        
        If mrc.EOF = False Then
            With mrc
                txtticket = .Fields(0)
                txtItem(0) = .Fields(7)
                txtItem(1) = .Fields(11)
            End With
        End If
.
txtItem(1)是文本框,也即是用来显示备注信息,.Fields(11)对应的是数据库中一个表的备注字段。当赋值给txtItem(1)时出错,说是空值,不能赋值。请问是不是要还要判断是不是空值?
在此先谢了,多谢各位高手指教。谢谢!!