大侠,我看可以输出两种结果,我如何吧这个结果输出来呢,我用msgbox命令输出来看看,结果输出的不一样!按k=0.53,最终也让a/b*c/d=0.53,程序计算出两个结果:60/75*53/80,63/75*53/84,我用msgbox命令,结果输出:86/76*94/88,不知道是怎么回事!求帮忙,把计算的结果60/75*53/80,63/75*53/84输出!就是保存的时候就是60/75*53/80,63/75*53/84这样的结果,谢谢
回复 11楼 hulusizyd
k = 0.53
For a = 1 To 100
For b = 1 To 100
For c = 1 To 100
For d = 1 To 100
If Abs(a / b * c / d - k) < 0.0005 Then text1.text=text1.text & a & "/" & b & "*" & c & "/" & d & ","
Next
Next
Next
Next
ABCD之间没有相互约束,满足条件的组合很多