错误提示：无法插入空行，行必须至少有一个列值集

来源：百度知道编辑：UC知道时间：2024/04/30 01:15:19

是VB+ACCESS做的程序。请问如何修改？先谢谢了。
Option Explicit
Dim sql As String
Dim connectionstring As String
Dim ez_room As New adodb.Recordset

Private Sub Form_Load()

On Error GoTo loaderror
connectionstring = "provider=Microsoft.Jet.oledb.4.0;data source= D:\bsvb\rent.mdb"
con.Open connectionstring
sql = "select * from 房间信息表" '检索房间信息表
ez_room.CursorLocation = adUseClient
ez_room.Open sql, con, adOpenKeyset, adLockPessimistic
loaderror:
MsgBox Err.Description
End Sub

Private Sub save_Click(Index As Integer)
On Error GoTo saveerror
If txtroomid(9).Text = "" Then
MsgBox "房屋编号不能为空！", vbOKOnly + vbExclamation, ""
txtroomid(9).SetFocus
Exit Sub
End If
ez_room.MoveFirst
Dim i As Integer
For i = 0 To ez_room.RecordCount -

添加的时候在文本框里什么也不输入出现的错误~~应该在文本框里做些限制，比如某些不允许为空的列添加的时候出现了空值．
类型不匹配：录入的类型与数据库的类型不一致．
这些问题都可以在文本框里做限制：例如只允许输入数字
Private Sub Text5_KeyPress(KeyAscii As Integer)
If (KeyAscii < 48 Or KeyAscii > 57) And KeyAscii <> 8 And KeyAscii <> 45 Then
KeyAscii = 0
End If
或在添加的时候判断不符合条件终止添加
If Text111.Text = "" Then
MsgBox ("请输入日期")
Exit Sub
End If

我想应该是你给字段赋值的时候出现了空值吧
最好是用iif(isnull(),"",())语句

比如:ez_room.Fields(1) = iif(isnull(Trim(txtroomid(9).Text)),"",Trim(txtroomid(9).Text))

类型不匹配，那就是字段的类型不是字符型或你赋给他的类型，将类型转换一下就可以了。比如数字类型和日期类型是不能用字符型的

为什么运行vb程序时当我把信息都输入完毕之后点击保存时显示无法插入空行，行必须至少有一个列集值呢？急！ WINDOWS2000无法上网，提示：在系统启动时至少有一个服务或驱动程序产生错误。 win2000server启动时提示至少有一个服务或驱动有错误,如何阻止错误提示 WINDOWS2000服务器版操作系统，第次开机都提示至少有一个程序或驱动安装错误开机的时候提示“在系统启动过程中至少有一个文件或驱动程序产生错误” 系统启动时提示：至少有一个服务或启动程序出现错误，怎么办？开机后提示：至少有一个程序出现错误（求解决办法）起动时提示"在系统启动时至少有一个服务或驱动程序产生错误" 开机时老是提示说：“至少有一个程序或驱动出现错误” 启动特慢提示至少有一个服务或驱动程序错误