English

Français

Framework.net

MSIL

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ACCESS

ORACLE

foxpro

delphi

HTML

WSC

boolean

Booleennes

MSIL

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

[0 . 1]  [false. true]  (8, 1 byte)

System.Boolean

bool

bool

bool b=true;

bool _B=new bool();

boolean

var _N = new Boolean(true);

var _N:boolean;

Dim _N As Boolean

Dim _N As System.Boolean

Dim _N As Boolean

Boolean

BIT

BIT

Boollean/Bytebool

m_b_N

[0. 1] (16)

Wordbool

[0 . 1] (32)

Longbool

integer

Numerique entier

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

[-127, 128](8, 1 byte)

System.SByte

signed char, _int8

__int8, signed char

signed char _C='c';

sbyte _SB1=new sbyte();

var _N:sbyte;

TI_NYI_NT

BYTE, TINYINT

Shortint, Byte

sbyte* _SB2=&_SB1;

[0, 255](8, 1 byte)

System.Byte

char

unsigned char

unsigned char _C1='c';

byte _B1=new byte();

var _N:byte;

Dim _N As Byte

Dim _N As System.Byte

Dim _N As Byte

unsigned char* _C2=new unsigned char();

byte* _B2=&_B1;

byte _B3=5;

[-32 768, +32 767](16, 2 bytes)

System.Int16

signed short/ _int16

__int16, signed short int, signed short, short

short

short _S1=new short();

short

var _N:short;

Dim _N As System.Short

SMALLI_NT

SHORT

Smalint

short* _S2=&_S1;

[0, +65 532](16, 2 bytes)

System.UInt16

unsigned short

unsigned short

unsigned short

ushort _US1=new ushort();

var _N:ushort;

Word

ushort* _US2=&_US1;

[-2 147 483 648, +2 147 483 647](32, 4 bytes)

System.Int32

signed int/ _int32

__int32, signed int

int *_I=new int();

int _I1=new int();

int

var _N:int;

Dim _N As Integer

Dim _N As System.Integer

Dim _N As Integer

I_NT[EGER]

INT, INTEGER

Longint / Integer

int* _I2=&_I1;

[ 0,+4 294 967 295](32, 4 bytes)

System.UInt32

unsigned int

unsigned int

unsigned int

uint _UI=new uint();

var _N:uint;

LongWord/ Cardinal

[-2^63, 2^63-1](64, 8 bytes)

System.Int64

signed long/ _int64

__int64, signed long int, signed long, long

long *_L1=new long(); *_L1=10;

long _L=new long();

long

var _N:long;

Dim _N As Long

Dim _N As System.Long

Dim _N As Long

BIGI_NT

LO_NG

Int64 /Comp

[0, 2^64](64, 8 byte)

System.UInt64

unsigned long

unsigned long

unsigned long

ulong _UL=new ulong();

var _N:ulong;

enumeration

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

enum _en{A,B,C,D};

enum

enum class/struct

enum _EN:T{A,B,C,D};

enum

Enum _N As T

End Enum

nullable

Déclaration et initialisation

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

n/a

n/a

n/a

T? __VAL=null;

DECLARE @_VAL INT

Local _VAL

SET @_VAL=0

_VAL=0

T __VAL2=__VAL ?? 0;

initialisation by default value

Déclaration et initialisation

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

n/a

n/a

n/a

T _tN2=new T();//T  _tN2=0;

var _VAL=new Number(0);

var _VAL:int=0;

Dim _VAL As Integer

Dim _VAL As Integer=0

DECLARE @_VAL INT

Local _VAL

initialisation direct  by value

T _tN2=100;

T _tN2=100;

T _tN2=100;

T _tN2=100;

T _tN1=0;

var _N1=100;

SET @_VAL=0

_VAL=0

initialisation by reference

unique value

T *_tN=new T('z');

T *_tN=new T('z');

T *_tN=new T('z');

n/a

get a refrence of unique value

T* _ptN3=&_tN2;

T* _ptN3=&_tN2;

T* _ptN3=&_tN2;

T* _ptN3=&_tN2;

T* _ptN3=stackalloc T[nbr];

DYNAMIC ARRAY

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

T *_N;  _N=new T[n];

T *_N;  _N=new T[n];

T *_N;  _N=new T[n];

T[] _ptN;   _N=new T[n];

T[] _N;   _N=new T[n];

T[] _N;   _N=new T[n];

T[] _N;   _N=new T[n];

var _N:T[];   _N=new T[n];

Dim _N as T(z)

Dim _N as T(z)

DECLARE @_N VARCHAR(12)

T *_N=new T[n];

T *_N=new T[n];

T *_N=new T[n];

T[] _N=new T[n];

T[] _N=new T[n];

T[] _N=new T[n];

T[] _N=new T[n];

var _N:T[]=new T[n];

Dim _N(n) As T

Dim _N(n) As T

SET @_N='Transact-SQL'

T[] _N=new T[n]{1.2.3};

T[] _N=new T[n]{1.2.3};

T[] _N=new T[n]{1.2.3};

T[] _N=new T[n]{1.2.3};

T[] _N=new T[n]{1.2.3};

T **_N=new T*[n];  *(_N+0)=new  T[n1];

T[][] _N=new T[n][]; _N[0]=new T[n2]

T[][] _N=new T[n1][n2];

T[][] _N=new T[n1][n2];

T[][] _N=new T[n1][n2];

var _N=new Array(n);  _N[0]=new Array(n1);

var _N:T[][] = new (T[])[n1];   _N[0]=new [n2];

Dim _N(n1)() As T

int[][] _pptN = new int [][]

{

new int[] {1,3,5,7,9},

new int[] {0,2,4,6},

new int[] {11,22}

};

DYNAMIC ARRAY OF (n) ORDER

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

T[.] _N= new T[n1.n2]

T[.] _N= new T[n1.n2]

var _N:T[.]=new T[n1.n2];

Dim _N(n1.n2) As T

Dim _N(n1.n2) As T

T[.] _N= new T[.]{{0.1}.{2.3}}

T[.] _N= new T[.]{{0.1}.{2.3}}

T[.] _N={{0.1}.{2.3}}

T[.] _N={{0.1}.{2.3}}

var _N:T[.]=[[0.1].[2.3]];

T[..] _N= new T[n1.n2.n3]

T[..] _N= new T[n1.n2.n3]

var _N:T[..]=new T[n1.n2.n3];

Dim _N(n1.n2.n3) As T

Dim _N(n1.n2.n3) As T

var _N = new Array();

var _N:Array=new Array;

Dim _N() As T

Dim _N() As T

Dim _N()

Dim _N()

var _N=new VBArray(n);

var _N=new VBArray(n);

STATIC ARRAY

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

T _N[n];

unsafe fixed T _pn[10];

var _N = new Array(n);

var _N = new Array(n);

Dim _N As T*n

Dim _N(n) As T

dim _N(n)

dim _N(n)

Array

DECLARE @_VAL CHAR(length)

T _N[n1.n2];

Dim _N(n1.n2) As T

Dim _N(n1.n2)

dim _N(n1.n2)

T *_N[]={new T[n1], new T[n2]}

T[][] _N=new T[][]{new T[n1], new T[n2]}

declaration+initialisation

T _N[]={0.1.2}

T[] _N={0.1.2}

var _N=new Array(0.1.2);

var _N:Array=[0.1.2];

Dim _N As T={1.2.3}

Dim _N=Array(0.1.2)

_N =array(0.1.2)

var _N=[0.1.2.3];

var _N:T[]=[0.1.2.3];

redimentionne en la preservant

Redim Preserve _N(m)

redim _N(m)

Reinitialise a 0

Erase _N

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

[0 . 255](1)

char _N[]="VC++";

string _N="VC++";

string

var _N:String="VC++";

Dim _N As String

Dim _N As String

String

DECLARE @_N CHAR(12)

ShortString

[0 . 2^31] (2) ansi

Dim _N As String

Dim _N As String

SET @_N='Transact-SQL'

AnsiString

[0 . 2^30] (4) unicode

Dim _N As String

Dim _N As String

WideString

char _N[][]={"AB", "BC"};

string[] _N={"ab", "cd"};

var _N:String[]=["ab"."cd"];

char _N[n];

string _N;

var _N:String;

Dim _N As String*n

Dim _N As String*n

char _N[n1][n2];

string _N[n2];

var _N:String[n2];

string[] _N=new string[]{"ab"."cd"}

string[] _N=new string[]{"ab", "cd"}

string[] _N=new string[]{"ab"."cd"}

interface

CLASS KEYWORD

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

classe abstraite  que l'on deriver pour implementer

interface

__interface

interface struct

interface Ibase{

interface

interface

interface

interface

interface

}

class

CLASS KEYWORD

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

class

class

__gc class

ref class

class

coclass

class

function

class

export

import

___value class

_value class

class

unsafe classe

__Nogc class

__nogc class

unsafe class

struct

Structure

struct

_gc struct

ref struct

struct

switch_is

var

function

Type  ... End Type

TABLE

TABLE

___value struct

value struct

struct

__Nogc struct

__nogc struct

unsafe struct

instance

commun a toutes les Instances

static

static

static

static

static

static

static

static

static

static

Shared

const

const

const

const

relatif a l'objet lui-même

this

this

this

this

this

this

this

this

Me

Me

this

masque celui d'une classe superieure

newobj

new

new

new

new

new

new

new

new

new

new

n/a

new

gcnew

stackalloc

__gc

__nogc

__nogc

field

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

ne peut etre modifier que par le constructeur

initonly

initonly

readonly

readonly

readonly

readonly

readonly

ReadOnly

La _VALeur ne etre stocker null part

volatile/register

volatile

volatile

volatile

ne peut etre modifier

const

const

const

const

static final

const

const

const

Const

#define

auto

no memory allocation but the _value is replace in the program

const static

literal

thread location storage

thread

thread

property function

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

Declare une propriete

__property

property

function

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

0

function

function

function

function

function

function

FUNCTION

definition de l'implementation à l'interieur de la declaration

inline

__inline/__forceinline/inline

__inline/__forceinline/inline

__alignof(…)

__alignof(…)

__declspec(noinline)

__declspec(noinline)

return

return

__declspec(noreturn)[1]

__declspec(noreturn)

__declspec( naked )

__declspec( naked )

__declspec( nothrow )

__declspec( nothrow )

__declspec(deprecated) [2]

__declspec(deprecated)

function pointer and events

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

__delegate/delegate

__delegate/delegate

delegate

__event

__event

event

dissociate a pointer and a handler

__unhook

__unhook

Associates a handler method with an event.

__hook

__hook

indicate a pointer toward nothing

nullptr

nullptr

Declares a pointer to inside a reference type, but not to the object itself. An interior pointer can point to a reference handle, _value type, boxed type handle, member of a managed type, or to an element of a managed array.

interior_ptr

interior_ptr

function parameter

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

par _VALeur

T _N=_VAL

T _N=_VAL

T _N=_VAL

T _N=_VAL

in

var _N=Val

var _N=Val

ByVal _N As T(_VAL)

ByVal _N As T(_VAL)

ByVal _N As T(_VAL)

@_VAL = @_VAL2

Par reference

T* _N=&_VAL

T* _N=&_VAL

T* _N=&_VAL

ref T _N=ref _VAL

par synonyme

T &_N=_VAL

T &_N=_VAL

T &_N=_VAL

out T _N=out _VAL

out

var _N=Val

var _N=&Val

ByRef _N As T(_VAL)

ByRef _N As T(_VAL)

ByRef _N As T(_VAL)

Set _N=GetRef myobject

create synonym NAME for ORIGINAL

params

drop synonym NAME

function api

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

implemente a l'exterieur

extern

extern

extern

extern

Shared

__declspec( dllimport ) declarator

__declspec( dllimport ) declarator

__declspec( dllexport ) declarator

__declspec( dllexport ) declarator

function inheritance

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

__sealed  class

sealed  class

sealed

final

final

methode()=0;

methode()=0;

methode()=0;

abstract

abstract

MustOverride

Methode peut être modifier au sein d'une classe derivé.

virtual

virtual

virtual

virtual

{all are virtual}

override

new

appel la classe de base

__super

__super

base

super

super

MyBase

ParentClass/BaseClass

class inheritance

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

logical condition of inheritance

is

is

is

is

the class cannot be inherited

__sealed/sealed  class

__sealed/sealed  class

sealed class

final

NotInheritable

inherite from a class

Inherits

implemente a interface

implements

Implements

the class must be inherited

abstract class

__abstract/abstract class

__abstract/abstract class

abstract class

MustInherit

__single_inheritance

__single_inheritance

__multiple_inheritance

__multiple_inheritance

__virtual_inheritance

__virtual_inheritance

keywords

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

break

break

break

break

break

break

Exit

break

continuer

continue

continue

continue

continue

continue

continue

continue

goto _LABEL ;

goto _LABEL ;

goto _LABEL ;

goto _LABEL ;

continue _LABEL ;

continue _LABEL ;

goto _LABEL

espace de nom

namespace

namespace

namespace

namespace

_Namespace/module

null

null

null

null

0

undefined

undefined

_Nothing

_Nothing

_Nothing

_Nothing

EMPTY() / IS_NULL()

using namespace

using namespace

using

using

using

with(){ }

using

With ... End With

Imports

With ... End With

With ... End With

delete

delete

delete

delete

delete

_Nothing

_Nothing

_Nothing

DROP

DROP

delete[]

delete[]

delete[]

espace commun à plusieurs variable

union

union

union

switch_is

U_NIO_N

U_NIO_N

hide

WriteOnly

import

pour les dll

exported

exported

argument d'une fonction optionnel

Optional

herite d'une classe

expando

lock

empeche une realocation d'une variable(unsafe)

deux pointeurs lies

__based

__based

code manage

managed

managed

code non manage

unmanaged

unmanaged

get the type of

typedef

typedef

typedef

using

get the size of

sizeof(…);

sizeof(…);

sizeof(…);

sizeof(…);

DATALE_NGTH(…)

VSIZE(…)

assembleur block

__asm{..}

__asm{..}

__assume

__assume

using in debuging

__noop[3]

__noop

Pointeur lie

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

ce que pointe pBase pBasePtr

int *_pBased;

int *_pBased;

le pointe aussi même apres

typedef int __based(_pBased) * _pBasedPtr;

typedef int __based(_pBased) * _pBasedPtr;

changement

SYNONYME

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

Creation synonyme

var _N=new Object

dim _N As Object

Object

_N=myobject

Set _N=myobject

myobject.method()

Suppression synonyme

myobject.method()

binary operator

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

and

ET logique

&

&

&

&

&

BITA_ND(arg1,arg2)

or

OU Inclusif

|

|

|

|

|

exclusive or

Ou exclusif

^

^

^

^

^

complementary

Complement

~

~

~

~

~

shift left

>>

>>

>>

>>

>>

>>

>>

shift rigth

<<

<<

<<

<<

<<

<<

<<

operator

operator

operator

operator

binary operartor =

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

&=

&=

&=

&=

|=

|=

|=

|=

^=

^=

^=

^=

~=

~=

~=

~=

>>=

>>=

>>=

>>=

<<=

<<=

<<=

<<=

unary operartor

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

=

=

=

=

=

=

=

=

=

=

=

=

=

=

+

+

+

+

+

+

+

+

+

+

+

+

+

-

-

-

-

-

-

-

-

-

-

-

-

-

*

*

*

*

*

*

*

*

*

*

*

*

*

/

/

/

/

/

/

/

/

/

/

/

/

/

%

%

%

%

%

%

%

Mod

Mod

Mod

MOD

%

%

STORE  0 to _N

^

unary operator

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

+=

+=

+=

+=

-=

-=

-=

-=

*=

*=

*=

*=

/=

/=

/=

/=

%=

%=

%=

%=

++

++

++

++

--

--

--

--

logical operartor

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

lesser than

<

<

<

<

<

<

<

<

<

<

<

<

<

greater than

>

>

>

>

>

>

>

>

>

>

>

>

>

equal

==

==

==

==

==

==

==

Eqv

Eqv

Eqv

=

=

lesser than or equal

<=

<=

<=

<=

<=

<=

<=

<=

<=

<=

<=

<=

<=

greater than or equal

>=

>=

>=

>=

>=

>=

>=

>=

>=

>=

>=

>=

>=

inequal

!=

!=

!=

!=

!=

!=

!=

<>

<>

<>

<>

<>

<>

logical and

&&

&&

&&

&&

&&

&&

&&

And

And

And

A_ND

A_ND

A_ND

logical or

||

||

||

||

||

||

||

Or

Or

Or

OR

OR

OR

Xor

Xor

Xor

not

!

!

!

!

!

!

!

Not

Not

Not

_NOT

_NOT

_NOT

logical condition

?:

?:

?:

?:

?:

?:

?:

IIF(cond.r1.r2)

IIF(cond.r1.r2)

IIF(cond.r1.r2)

ALL

ALL

EXIST

EXIST

LIKE

LIKE

renvoie _NULL si les deux expressions sont nulles

_NULLIF

renvoie la premiere expression non null sinon _NULL

COALESCE(expr)

_NVL(expr1,expr2)/ _NVL2(expr1,expr2,expr3)

A_NY

A_NY

logical operartor =

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

access operator

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

===

===

!==

!==

>>>

>>>

>>>=

in

[]

[]

[]

[]

[]

[]

[]

argument d'une fonction

()

()

()

()

()

()

()

membre Instance de classe

->

.

.

.

.

.

.

membre static d'une classe

::

.

.

.

.

.

.

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

//  remark

//  remark

//  remark

// remark

// remark

// remark

// remark

' remark

' remark

' remark

' remark

-- My Remark

-- My remark

*remark

/* remark  */

/* remark  */

/* remark  */

/* remark */

/* remark */

/* remark */

/* remark */

/* My Remark */

Rem remark

Rem remark

Rem remark

Rem remark

rem My remark

_NOTE remark

USE remark

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

for(...){

for(...){

for(...){

for(int _VAL;_VAL<10;_VAL++){

for(...){

for(...){

for(...){

For var=0... To...

For ... To...

For...To...Step

For ... To...step

CREATE SEQUE_NCE name_sequence START WITH 0 MAXVALUE 1000 _NOCYCLE

CREATE SEQUE_NCE name_sequence START WITH 0 MAXVALUE 1000 _NOCYCLE

FOR n = 1 TO 10

break;

break;

break;

break;

break;

Exit For

exit for

? n

}

}

}

}

}

_Next var

_Next

_Next

_Next

E_NDFOR

Exception

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

__declspec(nothrow)

__declspec(nothrow)

throw

throw

throw

TRY STRUCTURE

__try{

__try{

__try{

try{

try(...){

try(...){

try(...){

Try

throw new Exception();

throw new Exception();

throw new Exception();

throw new Exception();

throw

}__except(...){

}__except(...){

}__except(...){

catch{

}catch(...){

}catch(...){

}catch(...){

Catch

}__finally{

}__finally{

}__finally{

}finally{

}finally{

}finally{

Finally

}

}

}

}

}

}

}

End Try

try{

try{

try{

try{

__leave

__leave

}catch(CException* e){

}catch(CException* e){

}catch(CException* e){

}catch(Exception e){

}catch{

}finally{

}finally{

}finally{

}finally{

//clear any ressources

//clear any ressources

//clear any ressources

//clear any ressources

//used by try

//used by try

//used by try

//used by try

}

}

}

}

try{

try{

try{

try{

__leave

__leave

}catch(CException* e){

}catch(CException* e){

}catch(CException* e){

}catch(Exception e){

}catch{

}finally{

}finally{

}finally{

}finally{

//clear any ressources

//clear any ressources

//clear any ressources

//clear any ressources

//used by try

//used by try

//used by try

//used by try

}

}

}

}

throw(new Exception);

if

if

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

if(...){

if(...){

if(...){

if(...){

if(...){

if(...){

if(...){

if(...){

If.. Then

If.. Then

If.. Then

If.. Then

If.. Then

If.. Then

IF … BEGI_N

IF … BEGI_N

IF

}

}

}

}

}

}

}

}

End If

End If

End If

End If

End If

End If

E_ND

E_ND

E_NDIF

if else

if else

if(...){

if(...){

if(...){

if(...){

if(...){

if(...){

if(...){

if(...){

If...Then

If...Then

If...Then

If...Then

If...Then

IF … BEGI_N

IF … BEGI_N

}else{

}else{

}else{

}else{

}else{

}else{

}else{

}else{

Else

Else

Else

Else

Else

ELSE BEGI_N

ELSE BEGI_N

}

}

}

}

}

}

}

}

End If

End If

End If

End If

End If

E_ND

E_ND

if elseif else

if elseif else

if(...){

if(...){

if(...){

if(...){

if(...){

if(...){

If...Then

If ... Then

If ... Then

If ... Then

}elseif(...){

}elseif(...){

}elseif(...){

}elseif(...){

}elseif(...){

}elseif(...){

Else If...Then

Else If...Then

ElseIf...Then

ElseIf...Then

}else{

}else{

}else{

}else{

}else{

}else{

Else

Else

Else

Else

}

}

}

}

}

}

End If

End If

End If

End If

while

while

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

while(...){

while(...){

while(...){

while(...){

while(...){

While

While

While

While

WHILE … BEGI_N

}

}

}

}

}

Wend

End While

Wend

Wend

E_ND

while(...){

while(...){

while(...){

while(...){

while(...){

Do While

Do While

Do While

Do While

Do While

WHILE … BEGI_N

DO WHILE

break;

break;

break;

break;

break;

break;

Exit Do

Exit Do

Exit Do

Exit Do

BREAK

continue;

continue;

continue;

continue;

continue;

continue;

CO_NTI_NUE

}

}

}

}

}

Loop

Loop

Loop

Loop

Loop

E_ND

E_NDDO

Do Until

Do Until

Do Until

Do Until

Exit Do

Exit Do

Exit Do

Exit Do

Loop

Loop

Loop

Loop

do…while

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

do{

do{

do{

do{

do{

do{

Do

Do

Do

Do

Do

break;

break;

break;

break;

break;

Exit Do

Exit Do

Exit Do

Exit Do

Exit Do

}while(...);

}while(...);

}while(...);

}while(...);

}while(...);

}while(...);

Loop While

Loop While

Loop While

Loop While

Loop While

Do

Do

Do

Do

Do

Exit Do

Exit Do

Exit Do

Exit Do

Exit Do

Loop Until

Loop Until

Loop Until

Loop Until

Loop Until

switch

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

Switch

Switch

Switch

Choose

Choose

Choose

for

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

foreach(... in ...){

for(... in ...){

for (var prop in obj){

For Each prop In obj

For Each prop In obj

For Each prop In obj

For Each prop In obj

For Each..In

Exit For

}

}

obj[prop] = 42;}

_Next prop

_Next prop

_Next prop

_Next prop

_Next

switch

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

switch(x){

switch(x){

switch(x){

switch(x){

switch(x){

switch(x){

switch(x){

Select case x

Select case x

Select case x

Select case x

Select case x

Select case x

CASE …

CASE …

DO CASE

case 0:....;break;

case 0:....;break;

case 0:....;break;

case 0:....;break;

case 0:....;break;

case 0:....;break;

case 0:....;break;

case 0:....;break;

case 0 .....

case 0 .....

case 0 .....

case 0 .....

case 0 .....

case 0 .....

WHE_N … THE_N

WHE_N … THE_N

CASE x=0 ? ....

case 1:....;break;

case 1:....;break;

case 1:....;break;

case 1:....;break;

case 1:....;break;

case 1:....;break;

case 1:....;break;

case 1:....;break;

case 1 ....

case 1 ....

case 1 ....

case 1 ....

case 1 ....

case 1 ....

WHE_N … THE_N

WHE_N … THE_N

CASE x=1 ? ....

case 2:....;break;

case 2:....;break;

case 2:....;break;

case 2:....;break;

case 2:....;break;

case 2:....;break;

case 2:....;break;

case 2:....;break;

case 2 ....

case 2 ....

case 2 ....

case 2 ....

case 2 ....

case 2 ....

WHE_N … THE_N

WHE_N … THE_N

CASE x=2 ? ....

default:...;

default:...;

default:...;

default:...;

default:...;

default:...;

default:...;

default:...;

case else ....

case else ....

case else ....

case else ....

case else ....

case else ....

ELSE

ELSE

OTHERWISE ....

}

}

}

}

}

}

}

}

End Select

End Select

End Select

End Select

End Select

End Select

E_ND

E_ND

E_NDCASE

function

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

typedef INTEGER int;

using INTEGER=int;

function _N{

Type  _N

Type  _N

Type  _N

this.V

Dim V

Dim V

Dim V

}

End Type

End type

End type

_N V_N;

Var V_N=new _N

Dim V_N As _N

Dim V_N As _N

Dim V_N As _N

precompilation

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

#if

#if

@if

@if

#elif

@elif

@elif

#else

@else

@else

#endif

#endif

@end

@end

definir

#define

#define

#undef

#ifdef ... #endif

#if() ... #endif

#ifundef ... #endif

#if(!...) ... #endif

#pragma

@cc_on

@cc_on

@set

@set

#include "head.h"

#warning

#region

#endregion

#line

#line

#error

using System;

using System;

using System;

Beep

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

\b

\b

Beep

Beep

\f

\f

\n

\n

\t

\t

\v

\v

\'

\'

\"

\"

\\

\\

\0

\0

\ddd

\ddd

\xdd

\xdd

Function systemes

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

Général function

Général function

Général function

Général function

Général function

Général function

Général function

Général function

ActivXObject

CreateObject

Environ

e_VAL

E_VAL

E_VAL

E_VAL

E_VAL

GetObject

GetSetting

prompt

InputBox

IsArray

IsArray

IsArray

IsDate

IsDate

IsDate

ISDATE

IsEmpty

IsEmpty

IsEmpty

Is_Null

Is_Null

Is_Null

IS_NULL(expr,expr_remplacement)

Is_Numeric

Is_Numeric

Is_Numeric

IS_NUMERIC

IsObject

IsObject

IsObject

MsgBox

alert

MsgBox

QBColor

RGB

RGB

Shell

VarT

VarT

VarT

is_NA_N

escape

unescape

encodeURI

decodeURI

encodeURIComponent

decodeURIComponent

Instanceof

isFinite

parseInt

parseFloat

Int

Fix

IsMissing

End

charger dynamiquement

Load

LOAD

supprimer dynamiquement

Unload

RGB(red.green.blue);

Execute une procedure ou interprete une phrase

Execute

EXEC[UTE]

EXECUTE/ EXEC

ExecuteGlobal

DECODE

renvoie la plus grande des expressions

GREATEST(exp,…)

renvoie la plus petite expression

LEAST(exp,…)

USERENV

WIDTHBUCKET

cast valeur

CO_NVERSIO_N

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

Explicite

T1 _N1="10";

T1 _N1="10";

var _N1=new T1("10");

var _N1:T1;

Dim _N1 As T1

Dim _N1 As T2

convertion

convertion

convertion

Converti  _N1(T1) en _N2(T2)

T2 _N2=T2(_N1);

T2 _N2=_N1 AS T2;

var _N2=new T2(_N1);

n2=CAST(n1 AS T2)

_N2=(T2)_N1;

_N2=(T2)_N1;

_N2=(T2)_N1;

_N2=(T2)_N1;

_N2=CT2(_N1)

_N2=CT2(_N1)

n2=CO_NVERT(T2,n1)

CONVERT

_N2=_N1(bool);

_N2=_N1(bool);

_N2=_N1(bool);

_N2=_N1(bool);

_N2 =CBool(_N1)

CBool

CBool

T1 _N1="10";

_N2 =CByte(_N1)

CByte

CByte

boxing

object O=_N1;

_N2 =CCur(_N1)

CCur

CCur

unboxing

T2 _N2=(T2)O;

_N2 =CDate(_N1)

CDate

CDate

TO_DATE

doublr d=(double)_N;

doublr d=(double)_N;

doublr d=(double)_N;

doublr d=(double)_N;

_N2 =CDbl(_N1)

CDbl

CDbl

TO_NUMBER

short s=(short)_N;

short s=(short)_N;

short s=(short)_N;

short s=(short)_N;

_N2 =CDec(_N1)

CDec

CDec

int i=(int)_N;

int i=(int)_N;

int i=(int)_N;

int i=(int)_N;

_N2 =CInt(_N1)

CInt

CInt

cint

long l=(long)_N;

long l=(long)_N;

long l=(long)_N;

long l=(long)_N;

_N2 =Clng(_N1)

Clng

Clng

clng

float f=(float)_N;

float f=(float)_N;

float f=(float)_N;

float f=(float)_N;

_N2 =CSng(_N1)

CSng

CSng

char c=(char)_N;

char c=(char)_N;

char c=(char)_N;

char c=(char)_N;

_N2 =CStr(_N1)

CStr

CStr

TO_CHAR / TO_NCHAR

_N2 =CVar(_N1)

CVar

CVar

Hex

cast reference

Oct

binaire -> Decimal

BIN_TO_NUM

HEXTORAW / RAWTOHEX

CHARTOROWID / ROWIDTOID

TO_CLOB/ TO_NCLOB

chaine -> jour,seconde

TO_DSI_NTERVAL(expc)

chaine -> mois, année

TO_YMI_NTERVAL(expc)

chaine -> timestamp

TO_TIMESTAMP(expc,format)

chaine -> timestamp with time zone

TO_TIMESTAMP_TZ(expc,format)

implicit

explicit

verifie l'overflow

checked

ne verifie pas l'overflow

unchecked

__try_cast/safe_cast[4]

__try_cast/safe_cast

as

fixed

static_cast

static_cast

const_cast

const_cast

reinterpret_cast

reinterpret_cast

public static explicit operator byte(Digit d)

{

Console.WriteLine( "conversion occurred" );

return d._value;

}

Digit d = new Digit(3);

// Explicit (with cast) conversion from Digit to byte

byte b =(byte) d;

Implicite

public static implicit operator byte(Digit d)

{

Console.WriteLine( "conversion occurred" );

return d._value;

}

Digit d = new Digit(3);

// implicit (no cast) conversion from Digit to byte

byte b = d;

Create of instance

creation d'Instance

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

lib::cla *Ins=new lib::cla();

lib.cla  ^_ins=new lib.cla();

lib.cla Ins=new lib.cla();

dim Ins as new lib.cla();

Entrance

Entree

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

class MainApp {

Public Module modmain

.method public hidebysig static void  Main() cil managed

public static void Main(string[] arg) {

public static void Main(string[] arg) {

public static void Main(string[] arg) {

public static void Main(string[] arg) {

Sub Main()

{

}

}

}

}

End Sub

.entrypoint[5]

}

}

End Module

}// end of method EntryPoint::Main

namespace

ESPACE DE _NOM

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

namespace NS {

namespace NS {

namespace NS {

_Namespace CompVB

CREATE DATABASE

CREATE DATABASE

__gc class StringComponent {

public ref class CN {

public class CN {

Public Class StringComponent

public:

public CN() {…}

public CN() {…}

Public Sub _New()

StringComponent() {

}

}

End Sub

}

}

}

End Class

};

End _Namespace

};

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

function

FO_NCTIO_N

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

fonction scalaire

Fonction

int func(int param){

function F_N(...){

function F_N(...){

function F_N(...):T{

Function F_N(

Function F_N(

Function F_N As T

function F_N()

CREATE FU_NCTIO_N func(@param int)

<methode name=F_N intername=F_NB>

I_NT _VAL;

RETUR_N I_NT

renvoi

T _N;

T _N;

ByVal _N As T)As T

ByVal _N As T)As T

BEGI_N

arguments[i];

DECLARE @_VAL I_NT

Sortie de la fonction

Exit Function

une

_VALeur

return _VAL;

return _N;

return _N;

F_N T

F_N T

F_N T

F_N

RETUR_N @_VAL

}

}

}

}

End Function

End Function

End Function

end function

E_ND

</methode>

fonction table

fonction table

CREATE FU_NCTIO_N func(@param int)

<methode name=F_N intername=F_NB>

RETUR_N @tb TABLE(id I_NT,str CHAR(10))

renvoi

BEGI_N

DECLARE @_VAL I_NT

Sortie de la fonction

une

_VALeur

RETUR_N

retourne une table

retourne une table

E_ND

</methode>

Autre facon de declarer une

var F=new

var F_N:Function=new

CREATE FU_NCTIO_N func(@param I_NT) AS

function

Function(_N1."body");

Function(_N1."body");

RETUR_N SELECT * FROM tb

F_N  _N

invoquer la fonction

F_N(10);

F_N();

F_N();

Call F_N(_N)

Call F_N(_N)

Call F_N(_N)

F_N()

func(10)

Procedure

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

ne renvoie pas

int func(int param){

Sub S_N

Sub S_N

Sub S_N

Sub S_N()

CREATE PROCEDURE O_N name RETUR_N

de _VALeur

BEGI_N

Return

End Sub

End Sub

End Sub

End Sub

}

S_N()

E_ND

event

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

direct

evenement

evenement

evenement

evenement

evenement

evenement

evenement

evenement

evenement

P delegate T Pointer(T _N);

CREATE TRIGGER name_trigger O_N name_table FOR event

class CN{

function C_N{

BEGI_N

P event _pointer _theEvent;

this.FE=Path['ObjectId'];

P Launch(){

this.FE.OnEvent=function(){

Sub ObjectId_OnEvent

Sub ObjectId_OnEvent

Sub ObjectId_OnEvent

this._theEvent(0);

//Traitement

}

}

End Sub

P T Member(T _N){…}

}

}

End Sub

End Sub

E_ND

CN _ins=new CN();

CN Ins=new CN();

C_N Ins=new C_N();

C_N Ins=new C_N();

C_N Ins=new C_N();

C_N Ins=new C_N();

na

this._ins._theEvent+=_pointer(this._ins.Member);

this._ins.Launch();

this._ins._theEvent-=_pointer(this._ins.Member);

DROP TRIGGER name_trigger

Path.ObjId.OnEvent=function(){

}

indirect

P delegate T Pointer(T _N);

function _Name(){

class CN{

return;

Sub _Name

P event Pointer TheEvent;

}

Exit Sub

P Method(oject o.Event e){

Path.ObjectId.OnEvent=_Name;

End Sub

…

//pas de parentheses

Set Path.ObjectId.OnEvent = GetRef("_Name")

}

'pas de parenthese

}//end class

CN _ins=new CN();

_ins.TheEvent+=Pointer(_ins._Method);

Path.ObjId.OnEvent=function(){…}

DANS UN SCRIPT

<script language="JScript"

type="type/javascript"

for="OnEvent"

runat="Server"

src="path.file.js">

</script>

type reference managed (class)

CLASSE

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

class private auto ansi beforefieldinit ConsoleApplicationMSIL.Program extends [mscorlib]System.Object{

class CN{

P class CN{

class C_N{

function C_N(_N1._N2){

class C_N{

P Class C_N

Class C_N

CREATE SCHEMA

public:

T _VAL1;

P T _VAL1;

T _VAL1;

var _VAL1=_N1;

var _VAL1:T;

P Dim _VAL1 As T

Dim _VAL1 As T

Dim _VAL1

T _VAL2;

P T _VAL2;

T _VAL2;

var _VAL2=_N2;

var _VAL2:T;

P Dim _VAL2 As T

Dim _VAL2 As T

Dim _VAL2

T m3();

this.m10=m1;

this.m20=m2;

this.m30=Path.object;

constructeur

.method public hidebysig specialname rtspecialname

P CN(T n1, T n2){

P  CN(T n1, T n2){

P C_N(){

function C_N(_N1:T._N2:T){

P Sub _New(ByVal As T)

P Sub Class_Initialize

instance void  .ctor() cil managed

_VAL1=n1;

this._VAL1=n1;

this._VAL1=_N1;

_VAL1=_N

{

_VAL2=n2;

this._VAL2=n2;

this._VAL2=_N2;

_VAL2=_N

// Code size       10 (0xa)

fin constructeur

.maxstack  8

}

}

}

}

End Sub

End Sub

IL_0000:  ldarg.0

IL_0001:  call       instance void [mscorlib]System.Object::.ctor()

IL_0006:  nop

IL_0007:  nop

IL_0008:  nop

IL_0009:  ret

} // end of method Program::.ctor

debut methode m1

P:T m1();

P T m1();

P T m10();

function m10(){

function m10(){

P Sub m1() As T

P Sub m1

return;

return;

return;

return;

return;

m1

m1

fin methode m1

}

}

}

}

}

End Sub

End Sub

debut methode m2

P:T m2();

P T m2();

P T m20();

function m20(){

function m20(){

P Sub m2() As T

P Sub m2

return;

return;

return;

return;

return;

m2

m2

fin methode m2

}

}

}

}

}

End Sub

End Sub

debut methode m3

P:T m3();

P T m3(T[] ARG);

return;

fin methode m3

}

Gere levenement OnEvent

this.m30.OnEvent=function(){

Sub Object_OnEvent

}

End Sub

Property C_N() As T

Set(ByVal _N as T)

_VAL1=_N

End Set

Get

Return _VAL1

debut destructeur

End Get

fin destructeur

End Property

Function m3

End function

~CN(){

~CN(){

finalize

P Sub Class_Terminate

}

}

End Sub

fin class

}

};

}

}

}

End Class

End Class

implementation no inline

T CN::m3(){

}

Dim Ins

Instance par reference(adresse)

.locals init ([0] class ConsoleApplicationMSIL.Program p)

C_N *Ins=new C_N(10.20);

C_N Ins = new C_N(10.20);

var Ins=new C_N(1.2)

var Ins:C_N=new C_N(1.2);

Dim Ins As _New C_N()

Set Ins =_New C_N

IL_0000:  nop

IL_0001:  newobj     instance void ConsoleApplicationMSIL.Program::.ctor()

Dim Ins As C_N=_New C_N()

invoque m1

Ins->m1();

Ins.m1();

Ins.m10();

Ins.method1();

Ins.method1;

invoque m3(T

Ins->m3(new T[n]);

Ins.m3(new T[]{0.1});

Ins.m10();

Ins.method1();

Ins.method1;

detruire Ins

delete Ins;

delete Ins;

Set Ins =_Nothing

Instance par _VALeur

C_N VAL(10.20);

VAL.m1();

//pas de destructeur

type reference  not managed

__

unsafe class CN{

}

type value managed (struct)

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

struct SN{

struct SN{

var S_N{

Structure S_N

T _VAL1;

P T _VAL1;

_VAL1:10.

P _VAL1 As T

T _VAL2[10];

P T _VAL2[10];

_VAL2:"mon nom"

P _VAL2 As T

SN(){

SN(){

Sub _New

this._VAL1=10;

this._VAL1=10;

_VAL1=10;

}

}

End Sub

};

}

}

End Structure

POINTER

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

struct ligne{

CREATE TABLE name(

int m__VAL;

m__VAL int

ligne *next;

}

ligne *Queue=new ligne();

ligne *ins=new ligne();

Queue.next=ins;

)

CREATE I_NDEX ind

DROP I_NDEX ind

UPDATE STATISTIQUE

BIT FIELD

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

[Flag]

struct S{

struct S{

undefined b0:1;

undefined b1to3:2;

undefined b4to7:3;

undefined b8to14:6;

undefined b14to15:1;

};

}

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

var FSO;

dim FSO

FSO=new ActiveXObject(...)

set=CreateObject(...)

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

class c1{

P class c1{

class c1{

Class c1

T _N1;

P T m1(){

P T m1(){

}

}

P virtual T m2(){

P virtual T m2(){

DEFI_NE CLASS C2 AS C1

}

}

};

}

}

End Class

class c2:P c1{

P class c2:P c1{

class c2 extends c1{

class c2 extends c1{

Class c2 Inherits c1

T _N1;

T _N1;

c2():c1(){

c2():base(){

}

}

P T m2(){

P override T m2(){

}

}

};

}

}

End Class

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

Private T m_TheVar=0;

Private T m_TheVar=0;

Private T m_TheVar=0;

Private T TheVar=0;

Private var TheVar:T=0;

Property Let

Property FT() As T

End Property

Property Let

Let

Property Let

End Property

End Let

End Property

T TheVar(){

__property get_TheVar(){

__property get_TheVar(){

public T THEVAR{

function get FP():T{

Property Get

Get

Property Get

Property Get

return m_TheVar;

return m_TheVar;

get{

Exit Property

return TheVar;

return this.TheVar;

return TheVar;

}

}

}

}

}

End Property

End Get

End Property

End Property

void TheVar(T _N){

__property set_TheVar(T _N){

__property set_TheVar(T _N){

set{

function set FP():T{

Property Set

Set(ByVal _N as T)

Property Set

Property Set

TheVar=_N;

m_TheVar=_N;

m_TheVar=_N;

this.TheVar=_value;

TheVar=_N;

}

}

}

}

}

End Property

End Set

End Property

End Property

}

End Property

function pointer

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

Pointeur de fonction membre

typedef T (c1::*pointer)(T );

_delegate T pointer(T n);

_delegate T pointer(T n);

delegate T pointer(T n);

c1 Ins=new c1;

c1 Ins=new c0

c1 Ins=new c1

c1 Ins=new c1

membre non static

pointer pf=c1::m1;

pointer pf=new pointer(c1.m1);

pointer pf=new pointer(c1.m1);

pointer pf=new pointer(c1.m1);

l'invoquer

(Ins->*pf)(_VAL);

Ins.pf(_VAL);

Ins.pf(_VAL);

Ins.pf(_VAL);

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

typedef T (c1::*pointer)(T );

pointer pf=c1::m1;

c1 Ins=new c1;

(Ins->*pf)(_VAL);

interfacce

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

Interface I_N

Interface I_N{

interface I_N{

Interface I_N{

Interface I_N

T _N1;

T _N1;

var _N1:T;

T M1();

T M1();

Function M1(v:T):T;

Function M1(v as T) As T

T M2();

T M2();

Function M2():T;

Sub M2()

};

}

}

End Interface

C_N Implementation de I_N

class C_N :P I_N{

class C_N :I_N{

class C_N implements I_N{

Class C_N implements I_N

T M1(){

T M1(){

Function M1(v:T):T{

Function M1(v as T)As T

}

}

}

End Function

T M2(){

T M2(){

Function M2():T{

Sub M2

}

}

}

End Sub

};

}

}

End Class

Instance C_N

C_N *Ins=new C_N();

C_N Ins=new C_N();

var Ins:C_N=new C_N();

Dim Ins As _New C_N()

Invoquer methode M1

Ins->M1();

Ins.M1();

Ins.M1();

Ins.M1()

C_N *Ins2=Ins;

C_N Ins2=Ins;

var Ins2 :I_N=Ins;

Ins2->M2();

Ins2.M2();

Ins2.M2();

ACTIV X

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

<registration

description="My Test Component"

progid="Component.TestScript"

version="1"

classid="{2154c700-9253-11d1-a3ac-0aa0044eb5f}">

<public>

Fonction

T F_N(T _N){

function F_N(...){

function F_N(_N1._N2){

function F_N(...):T{

Function F_N(

Function F_N(

Function F_N As T

function F_N()

SELECT

<methode name=F_N internal=F_NB>

renvoi

T _N;

T _N;

ByVal _N As T)As T

ByVal _N As T)As T

<parameter name=_N1>

<parameter name=_N2>

</methode>

<property name="V1"/>

for(i=0;i<arguments.length;i++)

<property name="V2"/>

<event name="OnEvent1">

<event name="OnEvent2">

arguments[i];

</public>

Sortie de la fonction

Exit Function

une

FROM

<script language="jscript">

var V1;

var V2;

function F_N(_N1._N2){

_VALeur

return T;

return _N;

return _N;

F_N T

F_N T

F_N T

F_N

}

}

}

}

}

End Function

End Function

End Function

end function

</script>

</registration>

Autre facon de declarer une

var F=new

var F_N:Function=new

function

Function(_N1."body");

Function(_N1."body");

F_N  _N

invoquer la fonction

F_N(_N);

F_N();

F_N();

Call F_N(_N)

Call F_N(_N)

Call F_N(_N)

F_N()

ACTIV X

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

Typeof

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

Type t = typeof(MyClass);

// alternatively. you could use

// MyClass t1 = new MyClass();

// Type t = t1.GetType();

Params

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

nombre parametres multiples

T F_N(params T _N){

}

Console

Console

VC++

VC++.net

VC++.NET(2)

C#

COM

Java

VJ++

J#

JScript

Jscript.net

VB

VB.net

VBA

VBScript

ASP

ASP.net

Transact-SQL

ORACLE

foxpro

delphi

HTML

WSC

print("word");

Console.write("arg1={0} arg2={1}", 10, 20);

PRINT 'word'

---

[1]

TINEL Baptiste:
// noreturn2.cpp
__declspec(noreturn) extern void fatal () {}

int main() {
   if(1)
     return 1;
   else if(0)
     return 0;
   else
     fatal();
}

[2]

TINEL Baptiste:
// deprecated.cpp
// compile with: /W1
#define MY_TEXT "function is deprecated"
void func1(void) {}
__declspec(deprecated) void func1(int) {}
__declspec(deprecated("** this is a deprecated function **")) void func2(int) {}
__declspec(deprecated(MY_TEXT)) void func3(int) {}

int main() {
   func1();
   func1(1);   // C4996
   func2(1);   // C4996
   func3(1);   // C4996
}

[3]

TINEL Baptiste:
// compiler_intrinsics__noop.cpp
// compile with or without /DDEBUG
#include <stdio.h>

#if DEBUG
   #define PRINT   printf_s
#else
   #define PRINT   __noop
#endif

int main() {
   PRINT("\nhello\n");
}

[4]

TINEL Baptiste:
// keyword__try_cast.cpp
// compile with: /clr:oldSyntax
#using <mscorlib.dll>
using namespace System;

__gc struct Base {};
__gc struct Derived : Base {};
__gc struct MoreDerived : Derived {};

int main() {
   Base*bp = new Derived;
   try {
       MoreDerived* mdp = __try_cast<MoreDerived*>(bp);
   }
   catch(System::InvalidCastException*) {
       Console::WriteLine("Could not cast 'bp' to MoreDerived*");
   }
}
----------------------------------------------------------------------------------------

[5]

TINEL Baptiste:
.method public hidebysig static void  Main() cil managed
{
  .entrypoint
  .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 )
  // Code size       37 (0x25)
  .maxstack  8
  IL_0000:  call       class [mscorlib]System.Threading.EventWaitHandle [Microsoft.VisualStudio.HostingProcess.Utilities.Sync]Microsoft.VisualStudio.HostingProcess.Synchronize::get_HostingProcessInitialized()
  IL_0005:  brfalse.s  IL_0024
  IL_0007:  call       class [mscorlib]System.Threading.EventWaitHandle [Microsoft.VisualStudio.HostingProcess.Utilities.Sync]Microsoft.VisualStudio.HostingProcess.Synchronize::get_HostingProcessInitialized()
  IL_000c:  callvirt   instance bool [mscorlib]System.Threading.EventWaitHandle::Set()
  IL_0011:  pop
  IL_0012:  call       class [mscorlib]System.Threading.ManualResetEvent [Microsoft.VisualStudio.HostingProcess.Utilities.Sync]Microsoft.VisualStudio.HostingProcess.Synchronize::get_StartRunningUsersAssembly()
  IL_0017:  brfalse.s  IL_0024
  IL_0019:  call       class [mscorlib]System.Threading.ManualResetEvent [Microsoft.VisualStudio.HostingProcess.Utilities.Sync]Microsoft.VisualStudio.HostingProcess.Synchronize::get_StartRunningUsersAssembly()
  IL_001e:  callvirt   instance bool [mscorlib]System.Threading.WaitHandle::WaitOne()
  IL_0023:  pop
  IL_0024:  ret
} // end of method EntryPoint::Main