访问功能以隐藏表单上的控件

时间:2017-11-20 15:48:53

标签: vba function ms-access

ACCESS 2016

我正在尝试创建一个函数来隐藏传递给它的控件。

我有一个名为NextCheck的文本框。我有这个功能:

Public Function hideControl(ctrl As Control)
Set ctrl.Visible = False
End Function

以下表格中的Sub。

Private Sub testBtn_Click()
hideControl (Me.Nextcheck)
End Sub

当我运行时,我收到一条消息

  

'运行时错误' 424'需要对象

任何人都可以指出我正确的方向(我是一个有功能的新手),问题是这里有什么问题。我理解(Me.Nextcheck)是传递给函数的对象。

感谢。

0 个答案:

没有答案