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
为什么错了? 展开
展开全部
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
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询