recordset中find方法的问题

windbell0102 2007-11-29 01:55:35
窗体(下称窗体1)内有如下的控件:
文本框TName1:用于输入要姓名
按钮CSearch:"查询",点击该按钮开始查询
datadrid:显示找到的记录
adodc1:
按钮CModify:”修改",点击后进入另一个窗体(下称窗体2),修改职员的信息

现在的问题是我在窗体1内,按要求输入名字后,在datadrid中显示了相应的记录
但是我按下CModify按钮后,窗体2内显示的内容始终是adodc1中的第一个职员的记录信息
我看到参考书上说,用find方法可以使记录集的位置设置在找到的记录上,为什么我这样做结果还是不对呢?

附部分代码:
Private Sub CModify_Click()
Dim Num1 As String
Dim temp As String
Num1 = Adodc1.Recordset.Fields("身份证号")
Debug.Print Num1
Adodc1.Recordset.MoveFirst
temp = "身份证号='" & Num1 & "'"
Debug.Print temp //从立即窗口可以看到是要找的相应的职员
Adodc1.Refresh
Adodc1.Recordset.Find (temp)
frmCertificateManage.Show vbModal //显示窗体2
End Sub

...全文
124 点赞 收藏 8
写回复
8 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
windbell0102 2007-12-03
//窗体2的部分代码
Private Sub Form_Load()
//希望在这里显示窗体1中找到的记录的信息,但是现在一直显示第一条记录的信息
TName2.Text = Trim(frmCertificateQuery.Adodc1.Recordset.Fields("姓名"))
TDepartment2.Text = Trim(frmCertificateQuery.Adodc1.Recordset.Fields("部门"))
TPosition2.Text = Trim(frmCertificateQuery.Adodc1.Recordset.Fields("岗位"))
.....
.....
End Sub

回复
of123 2007-12-03
窗体 2 的代码呢?
回复
windbell0102 2007-12-03
顶~~~
回复
windbell0102 2007-12-01
自己顶顶,高手帮忙看看吧,谢谢了啊
回复
windbell0102 2007-11-30
我是想把窗体1的内容放到窗体2中修改
因为我刚刚学习VB,所以还希望各位高人帮忙看看到底要怎么处理,谢谢了
回复
qylisten 2007-11-30
窗体1 和 窗体2 中的数据来源一定要同步,不是简单的使用同一个来源就是自动同步的。你会不会是原来搞好这一个关系?
简单来说就是使用两个不同的数据控件,即使你将它们的来源指向同一个数据文件(表),你用其中一个数据控件表更改了数据的内容,另一个控件并不会同步显示这种结果的。
回复
Tiger_Zhao 2007-11-30
frmCertificateManage的数据哪里来?
回复
chyvlcy123 2007-11-30
你是不是想把1的查询内容放到2里再修改
回复
相关推荐
发帖

1187

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2007-11-29 01:55
社区公告
暂无公告