奇狐社區論壇 - 請問有關 IF THEN ELSE 之條件語法

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 請問有關 IF THEN ELSE 之條件語法 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=4504)

由 dich38 在 2006-01-12 08:02 發表:

請問有關 IF THEN ELSE 之條件語法

請問版主

若我要利用IF THEN ELSE 之條件語句
當版塊成員為"台指期貨"時 X=1、Y=2、Z=3
當版塊成員為"電子期貨"時 X=4、Y=5、Z=6
當版塊成員為"金融期貨"時 X=7、Y=8、Z=9
都不是時 X=10、Y=20、Z=30

IF STKINBLOCK(STKLABEL,'台指期貨')=1 Then
X:1; Y:2; Z:3;
ELSE IF STKINBLOCK(STKLABEL,'電子期貨')=1 Then
X:4; Y:5 ; Z:6;
ELSE IF STKINBLOCK(STKLABEL,'金融期貨')=1 Then
X:7; Y:8 ; Z:9;
ELSE
X:10; Y:20 ;Z:30;
END;

不知道是不是這樣寫?

原碼:


IF  STKINBLOCK(STKLABEL,'台指期貨')=1   Then

由 cgjj 在 2006-01-12 08:43 發表:

原碼:


X:0; Y:0; Z:0;

IF STKINBLOCK(STKLABEL,'台指期貨')=1 Then begin

  X:=1; Y:=2; Z:=3; 

  end;

ELSE IF STKINBLOCK(STKLABEL,'電子期貨')=1 Then begin

  X:=4; Y:=5 ; Z:=6; 

  end;

ELSE IF STKINBLOCK(STKLABEL,'金融期貨')=1 Then begin

  X:=7; Y:=8 ; Z:=9; 

  end;

ELSE begin

  X:=10; Y:=20 ;Z:=30; 

END;

由 dich38 在 2006-01-12 21:52 發表:

謝謝版主!感謝你!
-------------------------------------------------------

引用:

最初由 cgjj 發表

原碼:


X:0; Y:0; Z:0;

IF STKINBLOCK(STKLABEL,'台指期貨')=1 Then begin

  X:=1; Y:=2; Z:=3; 

  end;

ELSE IF STKINBLOCK(STKLABEL,'電子期貨')=1 Then begin

  X:=4; Y:=5 ; Z:=6; 

  end;

ELSE IF STKINBLOCK(STKLABEL,'金融期貨')=1 Then begin

  X:=7; Y:=8 ; Z:=9; 

  end;

ELSE begin

  X:=10; Y:=20 ;Z:=30; 

END;

謝謝版主!感謝你!

由 DUNHILL 在 2006-01-18 00:25 發表:

請問if then 的語法

X:0; Y:0; Z:0;
IF STKINBLOCK(STKLABEL,'台指期貨')=1 Then begin
X:=1; Y:=2; Z:=3;
end;

我將 'STKINBLOCK(STKLABEL,'台指期貨')=1 ' 這個條件改為
'close>6000' 時

X:0; Y:0; Z:0;
IF close>6000 Then begin
X:=1; Y:=2; Z:=3;
end;
就顯示語法錯誤請問要怎麼寫才對 ?

由 cgjj 在 2006-01-18 08:39 發表:

請仔細看教學
http://www.chiefox.com.tw/bbs/showt...=&threadid=2646

IF..... then 的條件語句僅能用於單一數值的判斷
不能用於數列 ( Close 是數列 )

數列可用另一個 IF 來比較
用法:
IF(X,A,B)若X不為0則返回A,否則返回B

例如:
IF(CLOSE<OPEN,LOW,HIGH)
表示該週期收陰則返回最低價，否則返回最高價

由 dich38 在 2006-02-12 19:59 發表:

請問版主
要如何將下列程式碼改寫為VBS之語法?

引用:

最初由 cgjj 發表

原碼:


X:0; Y:0; Z:0;

IF STKINBLOCK(STKLABEL,'台指期貨')=1 Then begin

  X:=1; Y:=2; Z:=3; 

  end;

ELSE IF STKINBLOCK(STKLABEL,'電子期貨')=1 Then begin

  X:=4; Y:=5 ; Z:=6; 

  end;

ELSE IF STKINBLOCK(STKLABEL,'金融期貨')=1 Then begin

  X:=7; Y:=8 ; Z:=9; 

  end;

ELSE begin

  X:=10; Y:=20 ;Z:=30; 

END;

由 cgjj 在 2006-02-13 09:24 發表:

引用:
最初由 dich38 發表
請問版主
要如何將下列程式碼改寫為VBS之語法?

S1:=STKINBLOCK(STKLABEL,'台指期貨');
S2:=STKINBLOCK(STKLABEL,'台指期貨');
S3:=STKINBLOCK(STKLABEL,'金融期貨');

將 S1,S2,S3 導入 VBS 計算判斷後, 再導出 X,Y,Z 即可

導入方法示例:
var = FFL.VarData("var")
導出方法示例:(有導入者才能被導出)
FFL.VarData("var")=var

全部時間均為台灣時間, 現在時間為01:25

在這個頁面顯示本主題全部的 7 個文章