为什么我不能添加记录 (急啊!高手们救救我这个菜鸟吧)
我用VB编程Access作为数据库,但是我怎么都不能添加记录,但是也不抱错。
我的代码如下:
Dim myconn As ADODB.Connection
Dim myrecord As ADODB.Recordset
Dim mySql As String
Private Sub Command4_Click()
On Error Resume Next
'产品编号不能为空
If Text1.Text = "" Then
MsgBox "产品序列号不能为空!"
Text1.SetFocus
Exit Sub
End If
showdata
myrecord("id") = Text1.Text
myrecord("client") = Text2.Text
myrecord.Update
showdata
MsgBox "保存成功!"
End Sub
我的代码如下:
Dim myconn As ADODB.Connection
Dim myrecord As ADODB.Recordset
Dim mySql As String
Private Sub Command4_Click()
On Error Resume Next
'产品编号不能为空
If Text1.Text = "" Then
MsgBox "产品序列号不能为空!"
Text1.SetFocus
Exit Sub
End If
showdata
myrecord("id") = Text1.Text
myrecord("client") = Text2.Text
myrecord.Update
showdata
MsgBox "保存成功!"
End Sub
...全文
相关推荐
TrintyCore菜鸟工具
**脚本编辑**:对于需要自定义的游戏逻辑,工具提供了一个脚本编辑器,使得修改或添加新的事件处理成为可能。5. **日志监控**:工具可以帮助用户实时查看服务器的日志,及时发现和解决运行中的问题。
android商城源码(菜鸟商城)
- **购物车**:实现了添加商品到购物车、修改商品数量、删除商品等功能,同时支持购物车结算操作。
随机分组(菜鸟程序)
**分组**:创建一个空列表来存储分好的组,然后遍历随机化后的列表,每`group_size`个元素作为一个小组,将其添加到结果列表中。这个过程可以用循环和切片操作完成。
Unity3D菜鸟教程
从给定的文件信息来看,标题“Unity3D菜鸟教程”和描述“Unity3D教程,菜鸟一样的例子,不妨碍参考,虽然日语版”表明这是一份针对初学者的Unity3D教程,即便是日语版本,也适合任何对Unity3D
阿里云ECS建网站(建站)超详细全套完整图文教程!菜鸟必看!-附件资源
阿里云ECS建网站(建站)超详细全套完整图文教程!菜鸟必看!-附件资源


数据库(包含打印,安装,报表)
