Question

当我单击一个命令按钮关闭表单时，代码重新查询是一个cbo和列表框，将焦点移动到lstbox和一个特定的行。我需要做的是添加一些“点击”列表框中具有焦点的当前行的代码。

以下是我在点击事件中的代码。

If Forms![frmmain]![txtHidden] = "addok" Then
Forms![frmmain]![cboAuthor].Requery
Forms![frmmain]![LstAuthor].Requery
Forms![frmmain]![LstAuthor] = Me.AuthorID
Forms![frmmain]![txtHidden] = "AddDone"
DoCmd.Close acForm, "frmAddAuthorFly"
Forms![frmmain]![cboAuthor].Requery
Forms![frmmain]![LstAuthor].Requery
Forms![frmmain].[LstAuthor].SetFocus
<NEED TO INSERT SOMETHING HERE TO CLICK THE ROW"

Else
MsgBox "txt hidden is not addok"
DoCmd.Close acForm, "frmaddauthorfly"
End If

Answer 1

单击本身不会执行任何操作，但您可能会运行一些OnClick代码。为此，只需调用OnClick事件即可。

但所有这些都需要 - 实际上是“点击” - 不应该被要求;好像你需要重新思考你的概念。

以编程方式单击列表框中的行

1 个答案: