※ 引述《sdtty (低调低调)》之铭言： : ※ 引述《sdtty (低调低调)》之铭言： : : 限制式 a1+a2+a3+a4=1 : : a1={0,0.1,0.2,0.3,0.4,0.5,0.6,0.7,0.8,0.9,1}-->共11组可行解 : : a2={0,0.1,0.2,0.3,0.4,0.5,0.6,0.7,0.8,0.9,1}-->共11组可行解 : : a3={0,0.1,0.2,0.3,0.4,0.5,0.6,0.7,0.8,0.9,1}-->共11组可行解 : : a4={0,0.1,0.2,0.3,0.4,0.5,0.6,0.7,0.8,0.9,1}-->共11组可行解 : : 要怎麽用vba写出所有可能的组合呢? : : 拜托各位高手了<(_ _)> : 因为a1+a2+a3+a4=1 : 所以可能的解为 : {a1,a2,a3,a4} : {0, 0, 0 , 1} : {0, 0,0.9,0.1} : {0, 0,0.8,0.2} : ... : .. : .. : {1, 0, 0 , 0} : 因为太多了估计大约有4000多组以上(应该是不止..)， : 所以没办法用手算 : 而目前的研究，需要计算全部有可能的解。 : 因此希望能有人可以帮忙 拜托了.. 原来没看清楚 , 跟 . 的差别 如果你只是要算出几组 当然可以用手算阿... 高中的排列组合就有教了吧 （咳咳... 是当年的高中，现在高中... 不知道） 不然离散数学也有教 依照你的题意，可以变成 a1+a2+a3+a4=40，ai = {0, 1, 2, ..., 10} 就会有 43! / (40! * 3!) 种排法 ==== 只不过，跟 VB 好像没啥关系.... -- 侃侃长论鲜窒碍 网站：http://www.psmonkey.idv.tw 众目睽睽无心颤 个人版：telnet://legend.twbbs.org 茕居少聊常人事 杀头容易告白难 欢迎参观 Java 版（@ptt.cc） \囧/ --

※ 发信站: 批踢踢实业坊(ptt.cc) ◆ From: 61.228.194.156