'Este exemplo mostra como classificar um array de strings
'em ordem alfabética

Module Module1
  Sub Main()
    ' cria um array de strings
    Dim cidades() As String = {"Goiânia", "Cuiabá", "Curitiba", _
      "São Paulo", "Florianópolis"}

    'exibe os valores do array na ordem original
    For i As Integer = 0 To cidades.Length - 1 Step 1
      Console.WriteLine(cidades(i))
    Next

    'classifica o array em ordem alfabética
    Array.Sort(cidades)
    Console.WriteLine()

    'exibe os valores do array na ordem alfabética
    For i As Integer = 0 To cidades.Length - 1 Step 1
      Console.WriteLine(cidades(i))
    Next

    Console.ReadKey()
  End Sub
End Module

procedure listarArquivosDir(diretorio: string; lista: TStrings);
var
  search_rec: TSearchRec;
begin
  if FindFirst(diretorio + '*.*', faAnyFile, search_rec) = 0 then
    begin
      repeat
        if search_rec.Attr <> faDirectory then
          lista.Add(search_rec.Name);
      until FindNext(search_rec) <> 0;

      FindClose(search_rec);
    end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  listarArquivosDir('c:\', ListBox1.Items);
end;

import java.awt.*;
import java.io.*;
import java.awt.image.*;
import java.awt.event.*;
import javax.swing.*;
import javax.imageio.*;

public class Estudos extends JFrame{
  private BufferedImage imagem;
  
  public Estudos(){
    super("Estudos Java");
    
    Container c = getContentPane();
    c.setLayout(new FlowLayout());
	
    JButton btn = new JButton("Carregar Imagem");
    btn.addActionListener(
      new ActionListener(){
        public void actionPerformed(ActionEvent e){
          imagem = null;
          
          try{
            imagem = ImageIO.read(
              new File("imagens/fundo.jpg"));
          }
          catch(IOException exc){
            JOptionPane.showMessageDialog(null, 
              "Erro ao carregar a imagem: " + 
              exc.getMessage());
          }

          if(imagem != null){
            desenhar();   
          }
        }
      }
    );

    c.add(btn);
    	
    setSize(400, 300);
    setVisible(true);
  }

  public void desenhar(){
    // desenha a imagem no JFrame
    Graphics g = getGraphics();   
    g.drawImage(imagem, 0, 0, this);
  }
  
  public static void main(String args[]){
    Estudos app = new Estudos();
    app.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
  }
}

package arquivodecodigos;

import javax.swing.*;
import javax.swing.text.*;
import java.awt.*;
import java.awt.event.*;
 
public class Estudos extends JFrame{
  JTextArea textArea;
  JButton btn;
 
  public Estudos() {
    super("Lendo as linhas de um JTextArea");
    Container c = getContentPane();
    FlowLayout layout = new FlowLayout(FlowLayout.LEFT);
    c.setLayout(layout);
     
    textArea = new JTextArea(10, 20);
    textArea.setLineWrap(true);
     
    btn = new JButton("Ler Linhas");
    btn.addActionListener(
      new ActionListener(){
        @Override
        public void actionPerformed(ActionEvent e){
          int quant = textArea.getLineCount();
             
          for(int i = 0; i < quant; i++){
            try{
              int inicio = textArea.getLineStartOffset(i);
              int fim = textArea.getLineEndOffset(i);
              String linha = textArea.getText(inicio, fim - inicio);
              JOptionPane.showMessageDialog(null, "Linha " + 
                (i + 1) + " = " + linha);
            }
            catch(BadLocationException ble){
              // possiveis erros são tratados aqui
            } 
          }    
        }
      }
    );
        
    c.add(textArea);
    c.add(btn);
     
    setSize(350, 250);
    setVisible(true);
  }
   
  public static void main(String args[]){
    Estudos app = new Estudos();
    app.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
  }
}

 
import java.awt.*;
import java.awt.event.*;
import javax.swing.*;
 
public class Estudos extends JFrame{
  public Estudos() {
    super("A classe JFrame");
     
    Container c = getContentPane();
    c.setLayout(new FlowLayout(FlowLayout.LEFT));
 
    JButton btn = new JButton("Minimizar");
    btn.addActionListener(
      new ActionListener(){
        public void actionPerformed(ActionEvent e){
          setExtendedState(ICONIFIED);
        }
      }
    );
     
    // Adiciona o botão à janela
    c.add(btn);  
 
    setSize(350, 250);
    setVisible(true);
  }
   
  public static void main(String args[]){
    Estudos app = new Estudos();
    app.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
  }
}

#include <wx/wx.h>

// arquivo de definição

// declaramos a classe application
class MinhaAplicacao : public wxApp{
public:
  // é chamado no startup da aplicação
  virtual bool OnInit();
};

// declara MinhaAplicacao& GetApp()
DECLARE_APP(MinhaAplicacao)

#include "aplicacao.h"

// arquivo de implementação

// aqui o wxWidgets implementa nosso objeto MinhaAplicacao
IMPLEMENT_APP(MinhaAplicacao)

bool MinhaAplicacao::OnInit(){
  // vamos mostrar uma mensagem ao iniciar a aplicação
  wxMessageDialog *alerta = new wxMessageDialog(NULL,
    wxT("A aplicação foi iniciada com sucesso"), wxT("Informação"), wxOK);
  alerta->ShowModal();

  // em geral retornamos true para iniciar o loop de eventos
  // mas essa aplicação exibe apenas uma janela de mensagem. Podemos sair
  return false;
}