VB 数据如何存储到SQL数据库中
PrivateSubCommand3_Click()Adodc2.Recordset.AddNewAdodc2.Recordset.Fields("车牌号").Value...
Private Sub Command3_Click()
Adodc2.Recordset.AddNew
Adodc2.Recordset.Fields("车牌号").Value = Text1.Text
Adodc2.Recordset.Fields("入场时间").Value = Text2.Text
Adodc2.Recordset.Fields("是否会员").Value = Text3.Text
Adodc2.Recordset.Fields("会员号").Value = Text4.Text
Adodc2.Recordset.Update
Adodc2.Refresh
End Sub
为什么错了？ 展开
Adodc2.Recordset.AddNew
Adodc2.Recordset.Fields("车牌号").Value = Text1.Text
Adodc2.Recordset.Fields("入场时间").Value = Text2.Text
Adodc2.Recordset.Fields("是否会员").Value = Text3.Text
Adodc2.Recordset.Fields("会员号").Value = Text4.Text
Adodc2.Recordset.Update
Adodc2.Refresh
End Sub
为什么错了？ 展开
3个回答
展开全部
Private Sub Command3_Click()
Adodc2.Recordset.AddNew
Adodc2.Recordset.Fields("车牌号") = Text1.Text
Adodc2.Recordset.Fields("入场时间") = Text2.Text
Adodc2.Recordset.Fields("是否会员") = Text3.Text
Adodc2.Recordset.Fields("会员号") = Text4.Text
Adodc2.Recordset.Update
Adodc2.Refresh
End Sub
Adodc2.Recordset.AddNew
Adodc2.Recordset.Fields("车牌号") = Text1.Text
Adodc2.Recordset.Fields("入场时间") = Text2.Text
Adodc2.Recordset.Fields("是否会员") = Text3.Text
Adodc2.Recordset.Fields("会员号") = Text4.Text
Adodc2.Recordset.Update
Adodc2.Refresh
End Sub
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
Adodc2.Refresh
改为
Adodc2.post
改为
Adodc2.post
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
这个格式没有错!
系统提示什么错误信息?
系统提示什么错误信息?
追问
谢谢你的关心，问题后来自己解决了
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
