VB, C#, Delphi Ԃ̖ߌ݊\

Visual Basic (ver 6 ȑO) C#.NET Delphi l
Dim i as Integer
i=1
Dim T as String
T="test"
int i=1;
string T="test";
var
i: Integer;
T: String;
begin
i:=1;
T:='test';
end;
gp”\ȕϐ^ɂ‚ẮAwvt@CQ
A+B
A-B
A*B
A/B
A mod B
A+B
A-B
A*B
A/B
A%B
A+B
A-B
A*B
A/B
A mod B
If  Then A
if () A;
if  then A;
If  then
A
End If
if ()
{
A;
}
if  then
begin
A;
end;
If  then
A
Else
B
End If
if ()
{
A;
}
else
{
B;
}
if  then
begin
A;
end
else
begin
B;
end;
A=B
A<>B
A<B
A<=B
A>B
A>=B
A==B
A!=B
A<B
A<=B
A>B
A>=B
A=B
A<>B
A<B
A<=B
A>B
A>=B
Select Case x
Case a
A
Case b
B
Case Else
C
End Select
switch (x)
{
case a:
A;
break;
case b:
B;
break;
default:
C;
break;
}
case x of
a:
begin
A;
end;
b:
begin
B;
end;
else
begin
C;
end;
end;
Do 
A
Loop
while ()
{
A;
}
while  do
begin
A;
end;
Do
A
Loop
do
{
A;
} while ();
repeat
A;
until
For i=1 to 10
A
Next i
for (i=1;i<=10;i++)
{
A;
}
for i:=1 to 10 do
begin
A;
end;
For i=10 to 1 Step -1
A
Next i
for (i=10;i>=1;i--)
{
A;
}
for i:=10 downto 1 do
begin
A;
end;
A=A+B
A=A-B
A=A+1
A=A-1
A+=B
A-=B
A++
A--
A:=A+B
A:=A-B
A:=A+1
A:=A-1