- 博客(1)
- 资源 (1)
- 收藏
- 关注
原创 一个全排列的解法[原创]
死鱼的命题!!简单写一下!Function Test(Max,x,Str1) If x>0 Then For I=1 to Max If Instr(Str1,","&i&",")=0 Then Test Max,x-1,Str1&i&"," End IF
2004-09-12 10:04:00 845 1
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人
--y0h在线
死鱼的命题!!简单写一下!Function Test(Max,x,Str1) If x>0 Then For I=1 to Max If Instr(Str1,","&i&",")=0 Then Test Max,x-1,Str1&i&"," End IF
2004-09-12 10:04:00 845 1
TA创建的收藏夹 TA关注的收藏夹
TA关注的人