【新手入門】之二十一：記錄集的“凌遲”——逐條導(dǎo)出記錄集

roych

      說到中國古代十大酷刑，想來把肉一塊塊割下來，直至犯人死去的“凌遲”應(yīng)該是名列第一的了。據(jù)聞劊子手行刑時(shí)往往也表示“鴨梨很大”，因?yàn)榱柽t是需要在三天內(nèi)割若干次。如果犯人提前掛了或沒達(dá)到規(guī)定的刀數(shù)，那對不起，下一個(gè)就是你——被執(zhí)行了。
       “凌遲”比較血腥，所以俺不打算多說，有興趣的版友們可以自行研究下古代刑法。這里只講一個(gè)跟“凌遲”類似的例子。

       這個(gè)例子說是“新手進(jìn)階”，是因?yàn)楸仨殞τ涗浖�稍有了解才方便理解的�！�—希望沒有打擊到大多數(shù)新手。
       這是在EH（ExcelHome）的一個(gè)版友的求助，先是貼一段代碼上來，說要把記錄集導(dǎo)出到文本。Roy看了半天，沒怎么領(lǐng)會，便說用TransferText宏即可。后來ta又說非要逐條記錄導(dǎo)出。——這可不是將好好的一個(gè)記錄集“凌遲處死”了嘛，哪還有王法啊。

       其實(shí)之前ta的代碼也算是不錯(cuò)的了。Roy只是一時(shí)沒理解而已。不過，既然夸下口說ta的代碼復(fù)雜，那么Roy也只能用更簡單的代碼來實(shí)現(xiàn)了。由于需要逐條導(dǎo)出，這時(shí)候TransferText是有些麻煩的了（當(dāng)然，改成動態(tài)條件也不是不可以的），后來想了想，似乎GetRows可以實(shí)現(xiàn)，便寫了這個(gè)例子。

       GetRows主要是把記錄集轉(zhuǎn)換為一個(gè)二維內(nèi)存數(shù)組，通過數(shù)組數(shù)據(jù)的輸出，從而達(dá)到逐條導(dǎo)出的目的。而作為接收方，我們需要創(chuàng)建文本文件用來寫入。至此，思路完全清晰，下面就是寫入的方法，據(jù)我所知有Open方法、OpenText和OpenTextfile方法，至于有沒有第4種方法，沒深入研究：
       這里的例子分別采用了第1種（原代碼）和第3種方法（Roy），具體看這個(gè)“血淋淋”的附件吧（里面有簡要的注釋）。{:soso_e112:}
     
【新手入門】之一：If分支語句
【新手入門】之二：分支語句總結(jié)
【新手入門】之三：循環(huán)語句For
【新手入門】之四：循環(huán)語句Do和死循環(huán)
【新手入門】之五：公共變量與傳址過程、傳值過程
【新手入門】之六：“悲歡離合總無情”——淺談Split和Join
【新手入門】之七：嵌套與并列——再談If流程問題
【新手入門】之八：“連就連”——淺談“&”和“+”連接符的區(qū)別
【新手入門】之九：從百錢百雞談起——淺談“規(guī)劃求解”兼答lingjiang問
【新手入門】之十：書到用時(shí)方恨少——自定義菜單（Access 2003）的制作
【新手入門】之十一：淺談ADO之序言
【新手入門】之十二：淺談ADO之Connection
【新手入門】之十三：淺談ADO之Conmmand（上）
【新手入門】之十四：淺談ADO之Command（下）
【新手入門】之十五：淺談ADO之Recordset（上）
【新手入門】之十六：淺談ADO之Recordset（下）
【新手入門】之十七：淺談列表框的使用
【新手入門】之十八：雙擊列表框修改數(shù)據(jù)
【新手入門】之十九：從“書與女友恕不外借”談起——淺談“Bookmark”的使用
【新手入門】之二十：“書與書簽”——bookmark屬性答疑
【新手入門】之二十一：記錄集的“凌遲”——逐條導(dǎo)出記錄集
【新手入門】之二十二：分組行號
【新手入門】之二十三：“富則妻妾成群”——淺談一對多錄入數(shù)據(jù)

【新手進(jìn)階】之一：基礎(chǔ)算法（一）
【新手進(jìn)階】之二：基礎(chǔ)算法（二）
【新手進(jìn)階】之三：基礎(chǔ)算法（三）
【新手進(jìn)階】之四：基礎(chǔ)算法（四）
【新手進(jìn)階】之五：排序搜索（一）
【新手進(jìn)階】之六：排序搜索（二）
【新手進(jìn)階】之七：遞歸算法
【新手進(jìn)階】之八：冒泡排序
【新手進(jìn)階】之九：淺談不綁定數(shù)據(jù)源操作記錄
【新手進(jìn)階】之十：工作日的計(jì)算
【新手進(jìn)階】之十一：“庖丁解�！焙汀凹o(jì)昌學(xué)射”——淺談表格式文本數(shù)據(jù)的導(dǎo)入
【新手進(jìn)階】之十二：從四腳騰空的奔馬談起——原來界面可以這樣設(shè)計(jì)
【新手進(jìn)階】之十三：Outlook風(fēng)格導(dǎo)航界面
【新手進(jìn)階】之十四：倉庫管理系統(tǒng)

ycxchen

版主的大作肯定要學(xué)習(xí)！

jinzhanxi

受教了！

tmtony

謝謝分享！

Grant

辛苦了,謝謝分享 {:soso_e100:}

JosephTan

那個(gè)帖子的地址?我看看是什麼

ysh5858

謝謝分享！

roych

JosephTan 發(fā)表于 2012-2-11 18:23
那個(gè)帖子的地址?我看看是什麼

原帖是要版主幫忙的，EH里的Access版塊更多的是精于SQL Server，所以我就客串一下了。
http://club.excelhome.net/forum. ... p;page=1#pid5636456

SRONE

謝謝分享！

Bonny_新樂

學(xué)習(xí)了。