Type Mismatch on variant field type

[1DMF]

Hello,

Why am I getting a type mismatch error for this line

If myControlInfo <> "" Then

the variable myControlInfo is defined as follows

Function SaveToAudit(ByVal frm As Form, ByVal lContactID As Long, ByVal sTable As String, [b]ByVal myControlInfo As Variant[/b])

a variant means it can be a string doesn't it?


"In complete darkness we are all the same, only our knowledge and wisdom separates us, don't let your eyes deceive you.

 

[mp9]

Just a hunch but try dropping the ByVal from your declaration of myControlInfo - Byval is not best used for String types anyway, plus if it's going to be a string declare it is a String, not a Variant...

http://www22.brinkster.com/accessory/

 

[Crowley16]

byVal means you are passing in the actual value of the variable instead of a reference of it, so shouldn't affect your conditional test.

what is more likely is that your variant value isn't a string, so you're testing 2 different types...

put a cstr() around the variant...


--------------------
Procrastinate Now!

 

[PHV]

Another thing to try:
If Trim(myControlInfo & "") <> "" Then

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[1DMF]

it's ok I was having a mad 5 minutes, the variable was an array simply changing it to

If myControlInfo(0) <> "" Then

works fine!

it was this line giving me the jip originaly

For a = 0 To UBound(myControlInfo)

I guess an array that equals "Empty" errors as I take it UBound = NULL if (0) is not defined/used

So needed to nest an IF condition around the the loop.

"In complete darkness we are all the same, only our knowledge and wisdom separates us, don't let your eyes deceive you.