stock_id = inputbox('Stock ID','Input Stock ID', space(20)) select * from stock_file where alltrim(cstockid)=alltrim(stock_id) into cursor cstock select cstock browse normal ?cstock.cstockid