I figured it out!!!
Instead of :
.COLUMNS[B].CONTROLSOURCE = laColumns[B]
I did this:
FOR B = 1 TO .COLUMNCOUNT
MyControlSource = '.COLUMN'+ALLTRIM(STR(B))+'.CONTROLSOURCE = laColumns[B] '
ENDFOR
THANKS YOU ALL SO MUCH
What is Wisdom?
Wisdom - The ability to respond to any situation according to God's Plan.
Therefore:
USE Wisdom IN Everything ORDER priority AS Knowledge
SELECT Knowledge
BROWSE FOR Understanding WHERE Wisdom=Guide
LeRoy Jackson