local m.accounts,m.x m.accounts='100,1100,200,250,3000' m.accounts=strtran(m.accounts,',',chr(13)) m.x="" for i=1 to memlines(m.accounts) m.x=m.x+"Accounts["+trans(i)+"]="+mline(m.accounts,i)+chr(13) endfor _clipboard=m.x messagebox(m.x,"string in clipboard")