最近做的VB+ACCESS的程序碰到的问题。。。。。
数据库内无任何约束条件,允许空值,但是在VB前台操作的时候,当我想显示数据到TXT上时出现“不能为NULL值”代码如下:
Private Sub cmdDetial_Click()
With frmWorkerDetail
.Caption = "详细资料"
.txtname.Locked = True
.txtname = frmWorkerInfo.AdoWorkerInfo.Recordset!WorkerName
.txtWorkerID = frmWorkerInfo.AdoWorkerInfo.Recordset!WorkerID
.txtAddress = frmWorkerInfo.AdoWorkerInfo.Recordset!Address
.txtsex = frmWorkerInfo.AdoWorkerInfo.Recordset!sex
.txtDegree = frmWorkerInfo.AdoWorkerInfo.Recordset!Degree
.txtPolitics = frmWorkerInfo.AdoWorkerInfo.Recordset!Politics
.txtDuty = frmWorkerInfo.AdoWorkerInfo.Recordset!Duty
.txtHomePhone = frmWorkerInfo.AdoWorkerInfo.Recordset!HomePhone
.txtIDNo = frmWorkerInfo.AdoWorkerInfo.Recordset!IDNo
.txtLevel = frmWorkerInfo.AdoWorkerInfo.Recordset!Level
.txtMarriage = frmWorkerInfo.AdoWorkerInfo.Recordset!Marriage
.txtMobilePhone = frmWorkerInfo.AdoWorkerInfo.Recordset!MobileNO
.txtother = frmWorkerInfo.AdoWorkerInfo.Recordset!other
.DTPjointime.Value = frmWorkerInfo.AdoWorkerInfo.Recordset!JoinTime
.DTPworktime.Value = frmWorkerInfo.AdoWorkerInfo.Recordset!JoinWork
.DTPbrithday.Value = frmWorkerInfo.AdoWorkerInfo.Recordset!BirthDay
.cmdOk.Visible = False
End With
End Sub
字段肯定没有问题,其他属性未改。。。。实在是不明白怎么回事?!
本人刚刚学习VB和数据库。。基本概念明白。。但是无经验。。。。。