eval assign
Posted: Mon Jul 22, 2019 9:17 pm
sorry I lost source by Richard - cannot find on forum or on Wiki - so I reinvented it and post here for posterity
I consider this to be really handy ability.
I consider this to be really handy ability.
Code: Select all
'EVAL ASSIGN
'Assigns variable by passed name
'LBB only
z=1
call evalAssign "z", 1.23
print z
'-------------------------------
sub evalAssign aVar$, aVal
'use LBB pane to see user function assign
'to be called as FNassign
dummy= eval("FNassign(";aVar$;",";aVal;")")
end sub
'helper function
function assign(byRef dest, src)
'print dest, src
dest=src
end function