タグ: Select Case – End Select

  • [言語比較]数値が範囲に納まるか

    [言語比較]数値が範囲に納まるか

    値が範囲内に収まるか否かを確認します

    C#

    ↓戻り値がTrueなら範囲に収まる、Falseなら収まらないとしています。型はintやdoubleなどにします

    bool 関数名(型 下限, 型 上限, 型 値)
    {
    	if (下限 > 上限)
    	{
    		型 一時的 = 下限;
    		下限 = 上限;
    		上限 = 一時的;
    	}
    	if (下限 > 値)
    	{
    		return false;
    	}
    	if (上限 < 値)
    	{
    		return false;
    	}
    	return true;
    }
    Lotus Script 言語

    ↓戻り値がTrueなら範囲に収まる、Falseなら収まらないとしています。型はLongやDoubleなどにします

    Function 関数名 (下限 As 型, 上限 As 型, 値 As 型) As Boolean
    	関数名 = False
    	If 値 > 上限 Then
    		Exit Function
    	Elseif 値 < 下限 Then
    		Exit Function
    	End If
    	関数名 = True
    End Function

     また Select を使って書くこともできます↓

    Function 関数名 (下限 As 型, 上限 As 型, 値 As 型) As Boolean
    	関数名 = False
    	Select Case 値
    		Case Is > 上限
    			Exit Function
    		Case Is < 下限
    			Exit Function
    	End Select
    	関数名 = True
    End Function