重新查询，返回记录 [英] Requery, Return to record

问题描述

Access 97

我想重新查询表单上显示的数据，然后我想将

返回到我所在的记录中。


为什么这段代码不起作用？


Private Sub CmdRefsh_Click（）

Dim RecId As Integer


RecId = Me.TxtID

Me.Requery


Me.RecordsetClone

.FindFirst[ID] =" &安培; RecId

结束


结束子


任何帮助？


Thnaks！

Access 97

I want to requery the data being displayed on a form, then I want to return
to the record I was in.

Why doesn''t this code work?

Private Sub CmdRefsh_Click()
Dim RecId As Integer

RecId = Me.TxtID
Me.Requery

With Me.RecordsetClone
.FindFirst "[ID] = " & RecId
End With

End Sub


Any help?

Thnaks!

推荐答案

试试这个：


Dim RecId As Integer

RecId = Me.TxtID

Me.Requery


with me.RecordsetClone

.FindFirst" ID" &安培; " =" &安培; RecId

me.Bookmark = .Bookmark

me.RecordsetClone.Close

结束


MS写道：

Try this:

Dim RecId As Integer
RecId = Me.TxtID
Me.Requery

With me.RecordsetClone
.FindFirst "ID" & "=" & RecId
me.Bookmark = .Bookmark
me.RecordsetClone.Close
End With

MS wrote:

Access 97

我想重新查询表单上显示的数据，然后我想
返回我所在的记录。 br />
为什么这段代码不起作用？

Private Sub CmdRefsh_Click（）
Dim RecId as Integer

RecId = Me.TxtID
Me.Requery

使用Me.RecordsetClone
.FindFirst" [ID] =" &安培; RecId
最终结束


任何帮助？

Thnaks！

Access 97

I want to requery the data being displayed on a form, then I want to return to the record I was in.

Why doesn''t this code work?

Private Sub CmdRefsh_Click()
Dim RecId As Integer

RecId = Me.TxtID
Me.Requery

With Me.RecordsetClone
.FindFirst "[ID] = " & RecId
End With

End Sub


Any help?

Thnaks!

" lauren quantrell" < LA ************* @ hotmail.com>在消息中写道

news：11 ********************** @ l41g2000cwc.googlegr oups.com ...

"lauren quantrell" <la*************@hotmail.com> wrote in message
news:11**********************@l41g2000cwc.googlegr oups.com...

试试这个：

Dim RecId作为整数
RecId = Me.TxtID
Me.Requery

with me.RecordsetClone .FindFirstID &安培; " =" &安培; RecId
me.Bookmark = .Bookmark
me.RecordsetClone.Close
结束

Try this:

Dim RecId As Integer
RecId = Me.TxtID
Me.Requery

With me.RecordsetClone
.FindFirst "ID" & "=" & RecId
me.Bookmark = .Bookmark
me.RecordsetClone.Close
End With

完美！


谢谢:-)

Perfect!

Thanks :-)

你不想关闭recordsetclone。由于你不打开唱片集克隆，

你不需要关闭它。


Neil


" lauren quantrell" < LA ************* @ hotmail.com>在消息中写道

news：11 ********************** @ l41g2000cwc.googlegr oups.com ...

You don''t want to close recordsetclone. Since you don''t open recordsetclone,
you don''t need to close it.

Neil

"lauren quantrell" <la*************@hotmail.com> wrote in message
news:11**********************@l41g2000cwc.googlegr oups.com...

试试这个：

Dim RecId作为整数
RecId = Me.TxtID
Me.Requery

with me.RecordsetClone .FindFirstID &安培; " =" &安培; RecId
me.Bookmark = .Bookmark
me.RecordsetClone.Close
结束


MS写道：

Try this:

Dim RecId As Integer
RecId = Me.TxtID
Me.Requery

With me.RecordsetClone
.FindFirst "ID" & "=" & RecId
me.Bookmark = .Bookmark
me.RecordsetClone.Close
End With

MS wrote:

Access 97

我想重新查询表单上显示的数据，然后我想

Access 97

I want to requery the data being displayed on a form, then I want to

将

返回到我所在的记录中。

为什么这段代码不起作用？

Private Sub CmdRefsh_Click（）
Dim RecId as Integer

RecId = Me.TxtID
Me.Requery

使用Me.RecordsetClone
.FindFirst" [ID] =" &安培; RecId
最终结束


任何帮助？

Thnaks！

to the record I was in.

Why doesn''t this code work?

Private Sub CmdRefsh_Click()
Dim RecId As Integer

RecId = Me.TxtID
Me.Requery

With Me.RecordsetClone
.FindFirst "[ID] = " & RecId
End With

End Sub


Any help?

Thnaks!

这篇关于重新查询，返回记录的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！