言語別 case文

【Delphi】

  条件文(iの部分)には32ビット以下の順序型が使用できる.文字(char)は使用できるが文字列は使用できない.

    case i of
        0:
        begin
            //コード
        end;
        1..5, 10:
        begin
            //コード
        end;
        else
        begin
            //コード
        end;
    end;


【VB.net】

    Select Case i
        Case 0
            ‘コード
        Case 1 To 4, 7 To 9, 11, 13, Is > 50
            ‘コード
        Case Else
            ‘コード
    End Select


【C++】

    switch( i ) {
        case 0 :
        {
            //コード
        }
        break;
        case 1 :
        {
            //コード
        }
        break;
        default:
        {
            //コード
        }
        break;
    }

言語別 配列作成

//要素0~19の配列を作る


【Delphi】

[静的配列]
var
  A: array[0..19] of integer;

[動的配列]
var
  A: array of integer;
begin
SetLength(A, 20); //配列の数を指定
//この場合 High(A) は19
end;


【VB2005】

Dim A(19) As Integer


【C++】

int *a;
try{ a = new int[20];} // 配列の領域確保
catch (std::bad_alloc){exit(-1);} // 領域確保失敗時の処理

delete [] a; //領域解放