访问2003年VBA：自定义窗体属性问题

我有一个常规的形式称为“鱼”。它有一个名为“loctree”的TreeCtl，我用它作为位置选择器来改变Fish中的字段。访问2003年VBA：自定义窗体属性问题

我已经向Fish添加了几个子表单。其中两个有我想使用loctree的位置字段。由于我不想为每个子表单实例化一个新的TreeCtl，所以我想我可以让loctree知道它的当前目标是哪个控件。我以为来定义当前的目标将是一个属性添加到我的鱼形式最简单的方法：

Option Compare Database 

Private locfield As Field 

Property Let loc_focusField(target As Field) 
    locfield = target 
End Property 

Property Get loc_focusField() 
    loc_focusField = locfield 
End Property

然后在鱼的形式打开事件，我可以设置locfield的默认值：

Private Sub Form_Open(Cancel As Integer) 
    locfield = Forms!fish_moves!fish_moves_loc_id 
End Sub

不幸的是，每次我尝试打开我的形式，我得到以下错误时间：

Definitions of property procedures for the same property are inconsistent, or property procedure has an optional parameter, a ParamArray, or an invalid Set final parameter

那么是什么原因？

感谢，仁

来源

2009-06-30 dnagirl

IIRC，你的属性应该像

Property Set loc_focusField(target As Field) 
    set locfield = target 
End Property 

Property Get loc_focusField() as Field 
    set loc_focusField = locfield 
End Property

运作的？

来源

2009-06-30 19:26:51 shahkalpesh

访问2003年VBA：自定义窗体属性问题

回答

相关问题