作者k0001315 (瓜子)
看板Visual_Basic
标题[VBA ] 解二元一次方程式
时间Fri Mar 13 10:31:30 2009
S Y
0.1 0.025
0.2 0.044444
0.3 0.06
0.4 0.072727
0.5 0.083333
0.6 0.092308
0.7 0.1
0.8 0.106667
0.9 0.1125
y=a*s/(b+s)
题目要解A跟B
想请问一下哪边错误了
Sub test()
K = 0
For b = -10 To 10 Step 0.1
K = K + 1
Cells(K, 1).Value = b
Cells(K, 2).Value = 0.25 * b + 0.025
Cells(K, 3).Value = b / 7 + 0.1
If Cells(K, 3) = Cells(K, 2) Then
Cells(K, 4).Value = "答案"
End If
Next b
End Sub
IF那里在被黄色线包围 有请板上的高手 这个程式错在哪边@@
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.227.129.180
1F：推 comaniac:If Cells(K, 3).Value = Cells(K, 2).Value Then 03/13 16:03
2F：推 jok200175:感谢!!! 03/20 15:40