>>262
サブルーチン化しました

dim X = 55

IFB 以上以下判定(50,X,60);msgbox ("50以上60未満です。");ENDIF

FUNCTION 以上以下判定(x,y,z)
RESULT = (x <= y and y <= z)
FEND