[AccessD]

Property Set is used only for objects.  If you are passing in a string,
that string has to be used to instantiate an object, along the lines of
:

Set frm = forms(iname)

Here's a sample from help:

Property Set Pen(P As Object)
    Set CurrentPen = P    ' Assign Pen to object.
End Property

Charlotte Foust

-----Original Message-----
From: Bruce Bruen [mailto:bbruen at bigpond.com] 
Sent: Thursday, May 15, 2003 4:05 PM
To: accessd at databaseadvisors.com
Subject: [AccessD] 


Dear List,

Given the following is as simple as it looks,  can anyone shed any light
on the compile error that it generates?

Option Compare Database
Option Explicit
Private mstr_clubname As String

Private Property Set clubname(ByVal iname As String) <<<<----------error
here! ''set the attribute with the supplied name of the club
        Set mstr_clubname = iname
End Property

''returns the value of the clubname attribute
Public Property Get clubname() As String
        clubname = mstr_clubname
End Property


The compile error is "Definitions of property procedures for the same
property are inconsistent or contain optional parameters or a
ParamArray"

Not according to this little black duck!  I've even asked a colleague to
read the help file item on the error and she cant understand a word of
it either, not that I believe it applies in any case.  However, I have
deleted EVERY other pice of code in the class module and the error is
still there.

Tia
Bruce






_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com