用vb6.0编写的修改程序没有反应,求指点
发布时间:2020-12-17 08:03:01 所属栏目:百科 来源:网络整理
导读:我试着编写了一段修改程序,如下; Private Sub Command4_Click() On Error GoTo errorhandler: If Text1.Text "" Then Adodc1.RecordSource = "select*from 库存 where 货物编号 =" Text1.Text Adodc1.Refresh Adodc1.Recordset.Fields("货物编号") = Text1.Te
我试着编写了一段修改程序,如下; Private Sub Command4_Click() On Error GoTo errorhandler: If Text1.Text <> "" Then Adodc1.RecordSource = "select*from 库存 where 货物编号 =" & Text1.Text Adodc1.Refresh Adodc1.Recordset.Fields("货物编号") = Text1.Text Adodc1.Recordset.Fields("货物名称") = Text2.Text Adodc1.Recordset.Fields("库存量") = Text3.Text Adodc1.Recordset.Fields("单位") = Text4.Text Else MsgBox "货物编号是主索引字段,不能为空","错误提示" End If Exit Sub errorhandler: MsgBox "货物编号是主索引,不能重复","错误提示" End Sub 但是运行后,对内容修改后怎么没反应啊,还是原来的内容,这个程序好像没反应似的,哪位大侠帮忙解释一下啊!不胜感激 (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |