主题：求数字的组合,请帮助.

egd文件下载

在这个"选号"表中按位选择对应的"号码",然后把按位选择的号码进行组合,并按顺序显示在"组合"表中,"组合"表中的"转换成数字三"是根据组合表中每组号码在"参数表"中对应的"数字三"选择出来的.

请各位老师帮助,谢谢.

-=-=-=- 以下内容由 李可可 在 2009年11月07日 05:41pm 时添加 -=-=-=-
谢帮助.

请各位老师帮助.

正在加紧学习.有问题还是要问的,谢谢.

只做出了对应的号码转换.号码的组合难度对我来说难度太大,请老师帮助吧.谢谢egd文件下载

CIearGrid("组合") And AddRows("组合",[%A%]*[%B%]*[%C%]*[%D%]*[%E%]-1)
And EvalFor("组合","组合序号","If(Mod(Row,[%A%])=0,[%A%],Mod(Row,[%A%]))") And EvalFor("组合","号码组合_1","Eval(" "Split(" " " " " "+[%AA%]+" " " " " " ," " " "| " " " ",[组合序号])" ")") And SortCol("组合","号码组合_1",1)
And EvalFor("组合","组合序号","If(Mod(Row,[%B%])=0,[%B%],Mod(Row,[%B%]))") And EvalFor("组合","号码组合_2","Eval(" "Split(" " " " " "+[%BB%]+" " " " " " ," " " "| " " " ",[组合序号])" ")") And SortCol("组合","号码组合_2",1) And EvalFor("组合","组合序号","If(Mod(Row,[%C%])=0,[%C%],Mod(Row,[%C%]))") And EvalFor("组合","号码组合_3","Eval(" "Split(" " " " " "+[%CC%]+" " " " " " ," " " "| " " " ",[组合序号])" ")") And SortCol("组合","号码组合_3",1) And EvalFor("组合","组合序号","If(Mod(Row,[%D%])=0,[%D%],Mod(Row,[%D%]))") And EvalFor("组合","号码组合_4","Eval(" "Split(" " " " " "+[%DD%]+" " " " " " ," " " "| " " " ",[组合序号])" ")") And SortCol("组合","号码组合_4",1) And EvalFor("组合","组合序号","If(Mod(Row,[%E %])=0,[%E%],Mod(Row,[%E%]))") And EvalFor("组合","号码组合_5","Eval(" "Split(" " " " " "+[%EE%]+" " " " " " ," " " "| " " " ",[组合序号])" ")") And SortCol("组合","号码组合_5",1)And SortCol("组合","号码组合_4",1) And SortCol("组合","号码组合_3",1) And SortCol("组合","号码组合_2",1) And SortCol("组合","号码组合_1",1)
没有找出错在那里,谢帮我看看.

和用VB的思路完全不一样.算啦,我放异异易表吧,也少给你们找麻烦,再见.永不用易表.