Count to 10

Got bored after the first three, since most others are just variations of these.
VB

 Spoiler

Code:

Sub v1()
    While x <= 10
        Debug.Print x
        x = x + 1
    Wend
End Sub

Sub v2()
    For x = 1 To 10
        Debug.Print x
    Next
End Sub

Sub v3()
    Do Until x = 10
        x = x + 1
        Debug.Print x
    Loop
End Sub

TSQL

 Spoiler

Code:

declare @x tinyint

set @x = 1
while @x <= 10
BEGIN
    print @x
    set @x = @x + 1
END


declare @x tinyint

set @x = 1
while @x <= 10
BEGIN
    print @x
    select @x = @x+1
END

C

 Spoiler

Code:

void v1()
{
    short int x;
    for ( x =1; x <= 10; x++)
    {
        printf( "%d\n", x);
    }
}

void v2()
{
    short int x=0;
    while ( x <= 10 )
    {
        x++;
        printf( "%d\n", x);
    }
}

void v3()
{
    short int x=0;
    while ( 1 )
    {
        if ( x <= 10)
        {
            x++;
            printf( "%d\n", x);
        }
        else
            break;
    }
}