lcs="AA,BB,CC,DD,EFG"
如何在VFP6下把它们放入数组，并取出变成
AA
BB
CC
DD
EFG

又是平時不學基本功之下提出的問題。

lcs="AA,BB,CC,DD,EFG"
=Alines(cstr,lcs,",")
?cstr(1)
?cstr(2)
......

VFP9我知道，我要用VFP6下

學會思考問題比學什麽現成的指令都有益得多。

對這個問題，既然希望分解字符串到數組中，那麽我們首先要解決如下的子問題：

1.如何從字符串中獲悉數組應有多少個元素？這是在平時分析字符串的諸多練習中必須解決的。
2.如果不能一下子知道有多少個元素，那麽能夠把元素逐個提取出來嗎？VFP的數組能夠逐個增大尺寸嗎？後者自然可以查閲資料解決。
3.其實前兩個問題歸結就是一個問題，即會不會逐個分解字符串子串。
4.查閲VFP的幫助系統或書本，看有沒有解決前面問題的内置函數或指令。
5.如果VFP6沒有，難道自己不會寫個GETWORD()函數給自己用？

舊版本沒有的東西，難道就投降了？爲什麽那麽著重版本？無非就是自己分析和解決問題的能力不足，尤其是沒培養把複雜問題分解爲相對簡單子問題的能力。這才是學習過程中最緊要的問題，其餘一切都是假的！

新舊版本的更替，變動了什麽，新版本一定有清單列出，平時應該看一看。而所有的變化，無非是兩類，一類是質的變化，一類則不是質的變化（衹是個別功能增强），前者是舊版本無法替代的，也是新版本推出的根本原因（凡是主版本號變化的，都是由於存在這種變化的緣故，想一想從版本6到版本9，中間有多少次質變？都是些啥？），後者卻是可以完全用舊版本現成的手段自己解決的，無非是自己當時沒想到要這種功能，或原作者發現很多人要求這種功能於是自己實現了優惠大家而已（這一類對應次版本號變化）。發現問題，首先判斷是屬於哪種性質的，再想辦法解決。樓主的問題，屬於自己可以解決的非質變問題，就算沒有ALINES()函數，完全可以自己寫一個。衹要你發現VFP9有某個函數，而VFP6沒有，但又屬於非質變問題，就可以自己寫一個，給自己升級爲準VFP9——這也是我總説最好用新版本的原因，否則你不知道新的有什麽、怎麽用，想在舊版本自己做一個也無從模仿起，甚至不知道有這種功能，這不是純粹的追新，而是有理由的。

[ 本帖最后由 TonyDeng 于 2014-5-26 13:09 编辑 ]

lcs="AA,BB,CC,DD,EFG"
=Alines(cstr,Chrtran(lcs,",",Chr(13)+Chr(10)))
List Memory Like cstr
VFP6帮助文件中有详细的说明

我之所以反對初學者一開始就使用SQL查詢語言，最主要的原因也是這個，因爲一旦它習慣了那些衹要發出指令就能到結果的東西，就必然不再願意花腦筋去學習自己動手得到結果的手段了，於是當屬下報告無法根據指令得到結果的時候，這個主管自己也無法教會屬下如何去實現，也就是所謂的“全求人”，等別人打牌給自己吃的。一個當主管的，不知道屬下當要實現目的時需要做什麽準備、如何配合、需求何種資源、如何協調，就是紙上談兵。舉個簡單的例子，那些用了SQL SELECT之後，不知道要用別名使用查詢視圖的人，就一定是沒學過最基本的過程編程，根本沒意識那是必要的配合，他連這個指令做了什麽、把結果放在哪裏、跟原來的數據有什麽關係，都不清楚，但凡是自己動手實現過過程的人，都是一定知道的。

sdta:
谢谢！
我想把原来VFP9的代码改为VFP6
zkm='语文,地理,化学,历史,生物,数学,物理,英语,思想政治'
nkm=alines(fkm,zkm,[,])
有你的指教现改为：
lcs="地理,历史,语文,数学,英语,物理,化学,生物,思想政治"
nrow=Alines(cstr,Chrtran(lcs,",",Chr(13)+Chr(10)))
alines()后面的参数能如此写法真是巧了。

VFP6帮助文件中Alines()函数说明不是太明了的