need opinion on array function

[arage]

Hi,
The below are several chicken scratch functions & procedures I wrote to validate the entries particular users can enter on a certain field, please let me know what you think & let me know if I’m on the right track as I’m still new to arrays.
Thanks!

Sub regCde_lost_focus()
If glbRegCde=1099 then
If me.regCde<>dfltCde then
Msgbox
Endif
Endif
Endsub

Sub regCde_got_focus()
Call deterDfltCde
endsub

function deterDfltCde()
if glbRegCde=1099
dfltCde=array(1000)
else if glbRegCde=1199
dfltCde=array(1100,1101)
endif
end function

 

[MHM]

Hi xxx,

do you really want to set up an array with either 1000 elements (which is all right) or 1100x1101=more than 1,000,000 elements (seems to be quite a lot..)

Be careful!

Mic