火速急救:数据库问题
大虾。。。救我
Dim i As Integer
Dim rst As ADODB.Recordset
For i = 1 To 7
If Text1(i) = "" Then
MsgBox "必要数据不能为空
Exit Sub
Else
Set rst = New ADODB.Recordset
With rst
.open"............"
.AddNew
.Fields(i).Value = Text1(i).Text
.Update
.Requery
.Close
End With
Text1(i).Text = ""
End If
Next i
我的问题是 1为什么添加入表的记录会分行?2怎么解决?请给代码!