| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 618 人关注过本帖, 1 人收藏
标题:vb有关的修改问题
取消只看楼主 加入收藏
奔跑的魔
Rank: 2
等 级:论坛游民
帖 子:22
专家分:10
注 册:2013-7-11
结帖率:71.43%
收藏(1)
已结贴  问题点数:10 回复次数:6 
vb有关的修改问题
如果我指定一条记录修改,用MSGBOX来决定是否保存修改,如果选,否,怎样返回原记录的数据,求大神指点
搜索更多相关主题的帖子: 记录 
2013-07-17 16:44
奔跑的魔
Rank: 2
等 级:论坛游民
帖 子:22
专家分:10
注 册:2013-7-11
收藏
得分:0 
我是用ADODC控件来写 ,如何修改控件方式提交,有没有 程序发给我啊,谢谢
2013-07-18 10:38
奔跑的魔
Rank: 2
等 级:论坛游民
帖 子:22
专家分:10
注 册:2013-7-11
收藏
得分:0 
那大神知不知道,如何在触摸屏中调出VB编的数据库?如果知道我把我的分全部给你,虽然只有60分
2013-07-18 17:06
奔跑的魔
Rank: 2
等 级:论坛游民
帖 子:22
专家分:10
注 册:2013-7-11
收藏
得分:0 
我是VB新手
这是我写的程序,修改指令
Private Sub Command4_Click()
Dim rds As New ADODB.Recordset
Dim c As String

rds.Open Adodc1.RecordSource, Adodc1.ConnectionString, adOpenKeyset, adLockOptimistic
rds.AddNew
If c = "" Then

c = MsgBox("确定要修改吗?", vbYesNo, "提示")

rds.Fields(0).Value = Text1.Text
rds.Fields(1).Value = Text2.Text
rds.Fields(2).Value = Text3.Text
rds.Fields(3).Value = Text4.Text
rds.Fields(4).Value = Text5.Text
rds.Fields(5).Value = Text6.Text
rds.Fields(6).Value = Text7.Text
rds.Fields(7).Value = Text8.Text
rds.Fields(8).Value = Text9.Text
Else
rds.update
Adodc1.Refresh

rds.Close
End If
End Sub
我数据修改后,点确定可以,点否时,回不到原先的数据。不知道什么原因???
我想实现的是,我鼠标点确定后,文本框为我修改后的值,点否时,文本框中的数据还是原先的。求大神指教


2013-07-18 17:32
奔跑的魔
Rank: 2
等 级:论坛游民
帖 子:22
专家分:10
注 册:2013-7-11
收藏
得分:0 
我按照你说做了,但是改完后,点确定,不是改后的数据啊,点否,倒是可以做到,恢复改之前的数据
2013-07-18 19:20
奔跑的魔
Rank: 2
等 级:论坛游民
帖 子:22
专家分:10
注 册:2013-7-11
收藏
得分:0 
可以了,谢谢你,
2013-07-18 19:22
奔跑的魔
Rank: 2
等 级:论坛游民
帖 子:22
专家分:10
注 册:2013-7-11
收藏
得分:0 
那大神知不知道,如何在触摸屏中调出VB编的数据库?如果知道我把我的分全部给你,虽然只有60分
2013-07-18 19:23
快速回复:vb有关的修改问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.023989 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved