vb6.0请教在字段为空的时候如何增加数据？
Dim rs As New ADODB.Recordset
Dim sql As String
sql = "select * from client"
rs.Open sql, cnn, adOpenKeyset, adLockPessimistic
rs.AddNew
rs!电话= Trim(Texttel.Text)
rs!姓名 = Trim(Textnom.Text)
rs!地址 = Trim(Textad.Text)
rs!城市 = Trim(Textvl.Text)
rs!邮编 = Trim(Textps.Text)
rs!手机 = Trim(Textbt.Text)
rs!QQ = Trim(Textqq.Text)
rs!msn = Trim(Textmsn.Text)
rs!邮箱 = Trim(Textemail.Text)
rs!备注 = Trim(Texbz.Text)
rs.Update
MsgBox "添加成功！", 0 + 48 + 0, "提示"
rs.Close
代码如上~！~
想做个会员资料库,如在有些字段为空的情况下不知道如何增加数据？
增加数据的时候报错~！
请高手指教 谢谢！ --------------------编程问答-------------------- 在数据库中设置字段允许为空。
补充：VB , VBA
