Functions that should return the same result but do not

[concoders]

I have two functions both should have the same results but they do not.


Public Function DefaultGreeting() As String


On Error Resume Next
DefaultGreeting = "Dear " & [Forms]![frm_contacts]![Dear] & ":"
End Function


Public Function DefaultBodyText() As String
On Error Resume Next
DefaultBodyText = [Forms]![frm_e_mailing]![mess_text] / this equals this just pulled from a table "Dear " & [Forms]![frm_contacts]![Dear] & ":"
End Function

[ranman256]

I don't see how they can equal..
[Forms]![frm_e_mailing]![mess_text] can be totally different than forms!frmContacts!dear

[concoders]

I don't see how they can equal..
[Forms]![frm_e_mailing]![mess_text] can be totally different than forms!frmContacts!dear

It is the same, only the second function is pulling from a table, where the first function is hard coded. I am trying to store code in a table to pull it into VBA this was an example.

[June7]

Also don't understand how they are equal. How is the data in field [Dear] also in [mess_text]? Exactly what is [mess_text] - field name, textbox name, both?

You mean you are storing text in a table and using code to dynamically retrieve instead of hard coding text.

If you want to provide db for analysis, follow instructions at bottom of my post.

[concoders]

this string ("Dear " & [Forms]![frm_contacts]![Dear] & ":") is in the field [mess_text] however when I do a lookup or set a variable from the form it is treated as a string not as this -> DefaultGreeting = "Dear " & [Forms]![frm_contacts]![Dear] & ":" -> this gives me Dear Concoders: the other gives me this ->"Dear " & [Forms]![frm_contacts]![Dear] & ":"

[June7]

Yep, that's what will happen.

What you are trying doesn't really make sense. If you need to be able to dynamically reference different forms (but the same field [Dear]) by the same code, store form name in field [mess_text] then build the reference with:

DefaultGreeting = "Dear " & Forms.Form("[" & [mess_text] & "]").[Dear]