Criar objetos a partir de uma classe

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim r1 As New Retangulo
        r1.Comprimento = 20
        r1.Largura = 10
        MsgBox(r1.Area)
    End Sub
End Class

Tratando-se de variáveis do tipo objeto, é necessário utilizar a palavra New* para criar efetivamente um novo objeto.

*New é um método construtor de uma classe.