How to test the contents of a field or control?

[paulwilliamsonremove]

Hi,

I want to be able to loop through all the controls on a form, get
their names, and then check if they contain a date, number, or string.

Is there a function to test the contents of a field or control? I am
using Access 2003.

Thanks

-pw

use paulwilliamson at spamcop dot net for e-mail

[pietlinden]

something like...

From INSIDE your form.

dim ctl as control
dim ctlType as string

for each ctl in Me.Controls
if isdate(ctl.Value) then
ctlType = "Date"
else if isNumeric(ctl.Value) then
ctlType="Number"
else if istext(ctl.value) then
ctlType="text"
end if
debug.print ctl.name " contains a " & ctlType & " value."
next ctl

or something like that...
Kinda seems weird to do this unless your controls are unbound,,, is
there a reason for this?

[paulwilliamsonremove]

On 23 Aug 2005 16:23:13 -0700, pi********@hotmail.com wrote:

something like...

From INSIDE your form.

dim ctl as control
dim ctlType as string

for each ctl in Me.Controls
if isdate(ctl.Value) then
ctlType = "Date"
else if isNumeric(ctl.Value) then
ctlType="Number"
else if istext(ctl.value) then
ctlType="text"
end if
debug.print ctl.name " contains a " & ctlType & " value."
next ctl

or something like that...
Kinda seems weird to do this unless your controls are unbound,,, is
there a reason for this?

Thanks! isDate, isNumeric, and isText are inherent in Acess 2003? I
can't find them in the help or my books. They must be a user function
(which is what I am asking help for)?

What I am going to do is build SQL Where clauses from a form where the
user can pick any combination of fields that are on the unbound form
and display the results, print mailing labels, e-mails, export to a
text file, etc..... It's actually a very powerful feature for our
lodge software. It's pretty slick, if I don't mind saying so myself
<BG>. Now I am "stealing" my own code for another application of mine.
I've done it before with A97 but I want to spiff up my old code.

So... I need to find out what type of variable (what text box,... or
whatever the user filled in) I have so I can satisfy Jet with it's
"crazy" syntax :-) I just can't my brain to absorb the rules!

Thanks!

-pw

use paulwilliamson at spamcop dot net for e-mail

[Larry Linson]

Try looking at Help from the module Window. Many functions are documented
only in VBA Help, even some that are usable in Access' expressions.

Larry Linson
Microsoft Access MVP

<pa******************@removespamcop.net> wrote in message
news:aq********************************@4ax.com...

On 23 Aug 2005 16:23:13 -0700, pi********@hotmail.com wrote:

something like...

From INSIDE your form.

dim ctl as control
dim ctlType as string

for each ctl in Me.Controls
if isdate(ctl.Value) then
ctlType = "Date"
else if isNumeric(ctl.Value) then
ctlType="Number"
else if istext(ctl.value) then
ctlType="text"
end if
debug.print ctl.name " contains a " & ctlType & " value."
next ctl

or something like that...
Kinda seems weird to do this unless your controls are unbound,,, is
there a reason for this?

Thanks! isDate, isNumeric, and isText are inherent in Acess 2003? I
can't find them in the help or my books. They must be a user function
(which is what I am asking help for)?

What I am going to do is build SQL Where clauses from a form where the
user can pick any combination of fields that are on the unbound form
and display the results, print mailing labels, e-mails, export to a
text file, etc..... It's actually a very powerful feature for our
lodge software. It's pretty slick, if I don't mind saying so myself
<BG>. Now I am "stealing" my own code for another application of mine.
I've done it before with A97 but I want to spiff up my old code.

So... I need to find out what type of variable (what text box,... or
whatever the user filled in) I have so I can satisfy Jet with it's
"crazy" syntax :-) I just can't my brain to absorb the rules!

Thanks!

-pw

use paulwilliamson at spamcop dot net for e-mail

[paulwilliamsonremove]

Try looking at Help from the module Window. Many functions are documented
only in VBA Help, even some that are usable in Access' expressions.

Larry Linson
Microsoft Access MVP

That was it Larry! Thanks!

-paul
-pw

use paulwilliamson at spamcop dot net for e-mail