vWord = txtAutoIn
txtYr = left(vWord,4)
vWord = mid(vWord,6)
i = instr(vWord,",")
txtInName = left(vWord,i-1)
vWord = mid(vWord,i+1)
txtInTel = vWord
Thank you.
The number of words in 1 is not fixed.
use the split function (only in VBA)
inyear=split(auto_in,",")(0)
inname=split(auto_in,",")(1)
in-tel=split(auto_in,",")(2)
don't understand 5
for 5 maybe just set DefaultValue property to Now().
If the number of elements in string varies, do you always want the first 3?
How to attach file: http://www.accessforums.net/showthread.php?t=70301 To provide db: copy, remove confidential data, run compact & repair, zip w/Windows Compression.
Thank you.