ROCK请看，我的机子上是这样的，怎么回事。
大家也去试试，看是不是具有普遍性！！！！

果然是文件一多就不行哦。。呵呵。。奇怪。。莫非AW计算不过来？

我得文件夹文件是按格式排列的啊，但是为什么显示时就乱了呢？？？

同志们，在ROCK斑竹的英明指引下，在我们5中央，D务院的务实领导下，在我们广大5DAW网友的无

私支援下，我版虚竹同志。。。。。。好了，好了，别砸卷心菜了，我发帖了》》》》
==========================================
我是这样写的源程序，实验了N次后才敢发了上来，同时提供实例链接:
http://haixin.diy.163.com/img/houzhui.a6p

取得文件的列表
--FileString:=Catalog(FileLocation,"F")
--取得总的文件数
FileNumber:=LineCount(FileString,Return)
--初始化后缀记录变量
FileFixs:=""

--取得所有的后缀字符串
repeat with i:=1 to FileNumber
FileNames:=GetLine(FileString,i)
lastindex:=CharCount(FileNames)
FileFix:=SubStr(FileNames,RFind(".",FileNames)+1,CharCount(FileNames))
FileFixs:=FileFixs^FileFix^Return
end repeat

--筛选后缀，使后缀不重复显示
FixsNumber:=LineCount(FileFixs)
repeat with k:=0 to FixsNumber
str:=GetLine(FileFixs,k)
str3:=str3^str
str1:=GetLine(FileFixs,k+1)
if Find(str1 ,str3)=0 then
fixs:=fixs^str1^Return
end if
end repeat

结合了Rock、AW5、虚竹的代码合成修改为最后完美版本：

返回文件夹下所有文件后缀名（不重复、避免大小写的问题）
61.151.244.212/vip/rock/Example/FileFixs.zip

希望大家在这里无保留的尽情的讨论！
这里是互助、互学、互利、共享的摇篮！
只有开放和交流才有进步和飞跃，不是吗！！呵呵！！

斑竹冤枉啊，我可是在为5D咱们版呐喊呢！！
是这个帖子，听说这个网友很急！你快帮忙看看，去宇风跟帖或者干脆在这里解决吧！！

引用:

---

原文由 闪动 发表:
谢谢大虾。
请问，要是这样的一种矩阵如何编程：
１，２，３，４选三个数的组合（不重复）：

１，２，３
１，３，４
２，１，３
２，３，４

请教各位了。

---