实习中时常需要将写好的SQL语句嵌入到VB.NET的函数中，例如将下列SQL：-- Get Mother Lot Common Infoselect c.customerlotnumber -- customer lot#,c.containername --Amkor lot#,,amk.description,inh.txndate indate--s_time,outh.txndate; outdate -- e-time,rs.resourcename resourcename,emp.fullname-- ,outh.qtyfrom container c,historymainline hml,workflowstep wfs,operation opt,movehistory outh,moveinhistory inh,RESOURCEDEF rs,amkorwwoper amk,employee empwhere c.splitfromid =(select containerid from container wherecontainername='ML6410058461')and hml.reversalstatus=1and c.containerid=hml.containeridand hml.operationid=opt.operationidand hml.workflowstepid=wfs.workflowstepidand hml.operationid=opt.operationidand hml.historymainlineid=inh.historymainlineid(+)and hml.historymainlineid=outh.historymainlineid(+)and HMl.RESOURCEID=RS.RESOURCEID(+)and (outh.historymainlineid is not null or inh.historymainlineid is not null)and opt.amkorwwoperid=amk.amkorwwoperidand hml.employeeid=emp.employeeidorder by c.containername,to_number(wfs.sequence),inh.txndate,outh.txndate转换如下形式为：String sql in VB.NETsql = 'select c.customerlotnumber -- customer lot# ' & vbCrLf _; & ',c.containername --Amkor lot#, ' & vbCrLf _; & ',amk.description ' & vbCrLf _; & ',inh.txndate indate--s_time ' & vbCrLf _; & ',outh.txndate; outdate -- e-time ' & vbCrLf _; & ',rs.resourcename resourcename ' & vbCrLf _; & ',emp.fullname ' & vbCrLf _; & '-- ,outh.qty ' & vbCrLf _; & 'from container c,historymainline hml,workflowstep wfs ' & vbCrLf _; & ',operation opt,movehistory outh,moveinhistory inh ' & vbCrLf _; & ',RESOURCEDEF rs ' & vbCrLf _; & ',amkorwwoper amk ' & vbCrLf _; & ',employee emp ' & vbCrLf _; & 'where c.splitfromid =(select containerid from container where ' & vbCrLf _; & 'containername='ML6410058461') ' & vbCrLf _; & 'and hml.reversalstatus=1 ' '..同事Tracy告诉我一个快速方法，仅仅利用UltraEdit的查找替换功能（<>号不填，仅为引用号），查找：< ^p >替换：<' & vbCrLf _; ^p; & ' >替换的第一个'号前不可省去空格，然后填上头尾即可，^p代表回车符，也就是将回车符展开，是不是很有趣的技巧？
http://www.cnblogs.com/ericguo/archive/2006/11/09/555134.html
