Accessing Form Values Programmatically

[mbthaz]

I have a query with criteria that can come from either a form control that is set with data, or from a variable that is culled from the environment by another function. Psuedo code goes like this:

If Form.reports.combo1 <> Null
Then Criteria = Form.reports.combo1
Else Criteria = Lookname()
Return Criteria


How do I code this in Access Basic?

Thanks in advance.

Mike

 

[thornmastr]

Public function GetCriteria as string

If nz(forms!reports.combo1.value,0) <> 0 then
GetCriteria = forms!reports.combo1.value
Else
GetCriteria = lockname()
Endif

End function
Robert Berman
Data Base consultant
Vulcan Software Services
thornmastr@yahoo.com

 

[mbthaz]

Thank you, had almost exactly that, but couldn't figure out how to reference the form control value. It is much appreciated.