Imports System

Module Program
  Sub Main(args As String())
    Dim palavra1, palavra2 As String
    palavra1 = "Visual Basic"
    palavra2 = "Visual Basic"

    If palavra1.Equals(palavra2) Then
      Console.WriteLine("As duas strings são iguais")
    Else
      Console.WriteLine("As duas strings são diferentes")
    End If

    Console.WriteLine(vbCrLf & "Pressione qualquer tecla para sair...")
    ' pausa o programa
    Console.ReadKey()
  End Sub
End Module

java.lang.Object
  java.lang.Character

public class Main {
  public static void main(String[] args) {
    // uma variável do tipo char
    char letra = 'A';
	
    // vamos verificar se o caractere anterior é uma letra maiúscula
    if(Character.isUpperCase(letra)){
      System.out.println("A letra é maiúscula");
    }
    else{
      System.out.println("A letra não é maiúscula");
    }
  }
}

public static void main(String[] args){
  // não se esqueça de adicionar um import para a classe Scanner
  // import java.util.Scanner;

  // vamos criar um objeto da classe Scanner
  Scanner entrada = new Scanner(System.in);

  int a, b; // variáveis que receberão os valores informados
  int soma; // variável que guardará a soma dos valores informados

  // vamos pedir ao usuário que informe o primeiro valor
  System.out.print("Informe o primeiro valor: ");
  // vamos ler o primeiro valor
  a = Integer.parseInt(entrada.nextLine());

  // vamos pedir ao usuário que informe o segundo valor
  System.out.print("Informe o segundo valor: ");
  // vamos ler o segundo valor
  b = Integer.parseInt(entrada.nextLine());

  // vamos efetuar a soma
  soma = a + b;

  // vamos exibir o resultado
  System.out.println("A soma dos valores é: " + soma);
}

public static void main(String[] args){
  // não se esqueça de adicionar um import para a classe JOptionPane
  // import javax.swing.JOptionPane;

  int a, b; // variáveis que receberão os valores informados
  int soma; // variável que guardará a soma dos valores informados

  // vamos pedir ao usuário que informe o primeiro valor
  a = Integer.parseInt(JOptionPane.showInputDialog("Informe o primeiro valor:"));

  // vamos pedir ao usuário que informe o segundo valor
  b = Integer.parseInt(JOptionPane.showInputDialog("Informe o segundo valor:"));

  // vamos efetuar a soma
  soma = a + b;

  // vamos exibir o resultado
  JOptionPane.showMessageDialog(null, "A soma dos valores é: " + soma);
}

Dim numero As Integer = 0

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

Dim numero As Integer = 10

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

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

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

  If valor > 20 Then
    pode = False
  End If
Loop

procedure TForm1.Button1Click(Sender: TObject);
var
  arquivo: TextFile;
  linha: String;
begin
  // vamos fazer uma ligação entre a variável arquivo e o
  // arquivo que queremos ler
  AssignFile(arquivo, 'C:\arquivo de codigos\dados.txt');

  // vamos abrir o arquivo em  modo leitura
  Reset(arquivo);

  // vamos ler cada linha e adicioná-la a um Memo
  while not Eof(arquivo) do
  begin
    ReadLn(arquivo, linha);
    Memo1.Lines.Add(linha);
  end;

  // hora de fechar o arquivo
  CloseFile(arquivo);
end;