Dim numero As Integer = 0

While numero <= 10
  Console.WriteLine(numero)
  numero += 1
End While

Dim numero As Integer = 10

While numero >= 0
  Console.WriteLine(numero)
  numero -= 1
End While

Dim pode As Boolean = True
Dim valor As Integer = 1

While pode
  Console.WriteLine(valor)
  valor += 1

  If valor > 20 Then
    pode = False
  End If
End While

procedure TForm3.Button1Click(Sender: TObject);
begin
  // vamos definir o comando SQL a ser executado
  SQLDataSet1.CommandText := 'SELECT * FROM contatos';

  // vamos executar o comando
  SQLDataSet1.Open;

  // vamos obter a quantidade de registros retornados
  ShowMessage('Quantidade de campos retornados: ' +
    IntToStr(SQLDataSet1.FieldCount));
end;

<?php
/*
  Em algumas situações podemos querer saber se
  o tipo de uma variável é integer, ou seja,
  contém um valor inteiro (sem casas decimais).
 
  Este teste pode ser feito com o auxílio da
  função is_int() ou is_integer(). Esta função 
  retorna um valor true ou false dependendendo do 
  tipo de variável sendo testada.    
  */ 
 
  $valor = 10;
 
  if(is_int($valor)){
    echo 'A variável $valor é do tipo integer';
  }
?>

try{
  // código que pode provocar erros
}
catch(Tipo_Exceção nome){
  // tratamento do erro
}

import java.io.*;

public class Estudos{
  public static void main(String[] args){
    try{
      DataInputStream in = new DataInputStream(
        new BufferedInputStream(
          new FileInputStream("conteudo.txt")));
        
      while(in.available() != 0)
        System.out.print((char) in.readByte());
    } 
    catch(IOException e){
      System.out.print(e.getMessage());
    }

    System.exit(0);
  }
}  

import java.util.*;

public class Estudos{
  public static void main(String[] args){
    String palavra = "Java";    

    Scanner in = new Scanner(System.in);
    
    System.out.print("Informe um inteiro: ");
    int indice = in.nextInt();

    try{
      System.out.println("O caractere no índice " + 
        "informado é " + palavra.charAt(indice));
    }
    catch(StringIndexOutOfBoundsException e){
      System.out.println("Erro:" + e.getMessage());
    }
  }
}