Reference a control value from frm variable in sub procedure

[twgonder]

I asked something similar for DAO syntax, but now I've got the same question for a Form object variable.

In a form is textbox, tbxNm1, which is bound to Nm1 in the table.
I've called a procedure in another module and have passed the form object via: SomeProcedure(Frm As Form)



Now I want to get the value for Nm1 that is in the form, from the Frm object.
Based on the DAO solution I thought something like this might work:
FldNm = "Nm1"
...
vFld = Frm.Fields(FldNm).Value

but no... (won't compile)

Note, I can't use Frm!Nm1 because I'm actually loop processing a lot of fields (for error checking) by variable.

What's the syntax?
Thanks

[CJ_London]

try

vFld = Frm("tbx" & FldNm)

or maybe

vFld = Frm.recordset.fields(FldNm)

if frm is a continuous form, should return the value from the current record

[Micron]

FldNm = "Nm1"

Think about how a computer responds to that: "Who the heck is FldNm" and to whom does s/he belong?

[Gicu]

I think you're looking for:

vFld = Frm.Controls(FldNm)

Cheers,

[twgonder]

I think you're looking for:

vFld = Frm.Controls(FldNm)

Cheers,

Yes, that works, and now to take it one step further...
I'm working on the validation routine for the form.
The label's caption, for a control, has been converted to foreign language.

This works (it's more complicated than my first example in post 1)
?frm.Controls("tbxm_Nm1")
Thomas

This gets the same result:
?frm.Controls("tbxm_Nm1").value

As well, I can do this:
?frm.Controls("tbxm_Nm1").name
tbxm_Nm1

Now I want to get the label name with this:
?frm.Controls("tbxm_Nm1").labelname (result: RTE 438; Object doesn't support this property or method)
(I've tripled checked that the textbox's label is exactly as the label name)
Is there a syntax problem or am I screwed in this endeavor?

Ultimately, this is what I need (or with correct syntax) to get the translated label for the text/combo box:
?frm.Controls(frm.Controls("tbxm_Nm1").labelname). caption

Note: In the code, "tbxm_Nm1" is replaced with a variable, I'm just testing with this in the immediate window to try and figure out the syntax)
My Google search didn't reveal any tricks or syntax to use.

[Gicu]

Try
?frm.Controls("tbxm_Nm1").Controls(0).Caption
or
?frm.Controls("tbxm_Nm1").Controls.Item(0).Caption

Some links for you:
https://stackoverflow.com/questions/...t-from-control
https://stackoverflow.com/questions/...ontrol-in-code

Cheers,

[twgonder]

Try
?frm.Controls("tbxm_Nm1").Controls(0).Caption
or
?frm.Controls("tbxm_Nm1").Controls.Item(0).Caption
...
Cheers,

Great, both of those work. I'm not sure why, with the Controls(0) bit, but I'm off to read why.
Thanks

[Gicu]

Here is a very good reference:
https://www.devhut.net/ms-access-vba...ociated-label/

Cheers,