請教管理員技術問題
作者：開拓者 TB 來源：cxh99.com 發布時間：2016年06月07日
- 咨詢內容：
Vars
Numeric i;
Numeric i1;
Numeric i2;
Numeric i3;
Numeric ah;
Numeric al;
Numeric bh;
Numeric bl;
Numeric ch;
Numeric cl;
Numeric A1;
Numeric B2;
Numeric C3;
Numeric D4;
Numeric E5;
Begin
If(h[1] > h[2] && l[1] >= l[2])
{
For i = 1 to 100
{
If(h[i] > h[i+1] && l[i] >= l[i+1])
{
ah = h[1];
al = l[i+1];
i1 = i+1;
}Else Break;
}
If(h[i1] <= h[i1+1] || l[i1] < l[i1+1])
{
For i = (i1+1) to 100
{
If(h[i] <= h[i+1] && l[i] < l[i+1])
{
bh = h[i+1];
bl = l[i1+1];
i2 = i+1;
}Else Break;
}
If(h[i2] > h[i2+1] || l[i2] >= l[i2+1])
{
For i = (i2+1) to 100
{
If(h[i] <= h[i+1] && l[i] < l[i+1])
{
ch = h[i+1];
cl = l[i2+1];
i3 = i+1;
}Else Break;
}
}
}
}
A1 = ah;
B2 = Lowest(al,bl);
C3 = bh;
D4 = cl;
E5 = ch;
Commentary("A1 = " + Text(A1));
Commentary("B2 = " + Text(B2));
Commentary("C3 = " + Text(C3));
Commentary("D4 = " + Text(D4));
Commentary("E5 = " + Text(E5));
Commentary("i1 = " + Text(i1));
Commentary("i2 = " + Text(i2));
Commentary("i3 = " + Text(i3));
End
麻煩管理員幫忙看下，公式寫法上有沒有什么錯誤 ，為什么B2的值標注不出來？
- TB技術人員：
管理員 在么 ？ 為什么 我發了 好幾個問題 都沒有人幫忙解答啊 ？ 是不是我問的問題 沒有辦法解答 或者 問的太簡單了？還是我沒有問清楚？
- TB客服：
cjy047 發表于 2016-4-5 19:55
管理員 在么 ？ 為什么 我發了 好幾個問題 都沒有人幫忙解答啊 ？ 是不是我問的問題 沒有辦法解 ...
在公式里B2的計算依賴于al與bl的值 ，您可以輸出al 與bl的值看看都是什么情況。。
我這邊看到都是很奇怪的值 ，要么都是很大的值 ，要么都是0。自然出不了結果。。
另外，并非所有運算都需要循環，如果要用也要確保其結果是自己想要的。。
建議還是從循環這一塊著手再排查一下
打印本文
關閉窗口