Passing Property to Form

[Middlemarch]

In form called frmER Declarations I have
Private filenames As Variant
Then

Public Property Let fnArray(x As Variant)
    filenames = x
    MsgBox UBound(filenames)
End Property

From a module

 Form_frmER.fnArray = files
 DoCmd.OpenForm "frmER", acNormal, , , , acDialog

Should the Open Form command should be before or after the assignment of Files.

[June7]

What happens when you run code?

[Middlemarch]

Both ways seem to work, but a type mismatch error came up and I wanted to be sure that first part was correct.
How would you pass a array to a Form ?

[June7]

I have never coded custom properties for anything.

I have just passed array object as procedure argument or public/global declared variable.

Type mismatch for both approaches?

[Middlemarch]

> Type mismatch for both approaches?
Yes, although the error might be correct. No problem if I pass it as a string.
I have this vague recollection if you use Form_ type addressing and the Form isn't Open, it will Open.
I was wanting to nail down the correct order before looking further.
Access is so b complicated if you haven't used it for a while....

[jojowhite]

you need to Declare your variable, filenames As Variant also.

[Middlemarch]

OK, jo. Isn't that done in the declarations?

[jojowhite]

sorry, did not see that.
on this code:

Form_frmER.fnArray = files

is files an Array?
because on the code you are Msgboxing it's dimension (Ubound).

[Middlemarch]

files is a variant holding 2 items (while testing).
But I'm a bit snookered how this is working.

Form_frmER.fnArray = files

This runs the Form Load Event. But I don't want that happening until

 DoCmd.OpenForm "frmER", acNormal, , , , acDialog

How can I pass that property to the Form without Opening it ?
Because I can't do it after the Form opens. Its acDialog.

[davegri]

Have a look at this discussion. WGM had comments too!

Solved - Passing values to popup using OpenArgs | Access World Forums

[Middlemarch]

Understood Dave, split OpenArgs. I can see how that would work. I can also pass my array with a global variable as June said.
But why can't I use Property Let. Isn't that what it's for ?
Annoying i have used it in the past, but can't remember exactly how.

[jojowhite]

you can get rid of global variable by opening your form "normaly" and set the property.
later you set its Modal property to True:

DoCmd.OpenForm "frmER"
With Forms!frmER
    'pass the array
    .fnArray = files
    'make the form Modal
    .Form.Modal = True
End With

[Middlemarch]

Ah, thank jo. That is working. Don't know why but everything I tried turned to custard.
I think my Type Mismatch problem was multiple openings of the Form, and the variable wasn't seen by the current instance.
Yours was a good solution..

[Middlemarch]

Jo I did have that working, but there was a noticeable lag while the array passed was processed.
So (and this is new to me) I used the form open event to do everything. Then the form opens with it's Listview control already populated.
But I need to have the files array available in the Form Open event. I need to revert to a Global variable to do that ?
I did try .Visible= False in that with block but that wasn't good, the screen flash was worse than the delay

[jojowhite]

how do you Populate the "files" array?
and on frmER, how do you Populate the listbox (are you using Listview, and ActiveX)?