Cómo crear una clase en vb, por favor dé un ejemplo

Nombre de clase [ ( De lista de tipos ) ]

[Nombre de clase heredada]

[Nombre de interfaz de implementación]

[Declaración]

Fin de clase

Ejemplo:

Cuenta bancaria de clase

Tasa de interés compartida como decimal

Número de cuenta privada como cadena

Saldo de cuenta privada como decimal

Cuenta HoldOn pública como booleano = Falso

Saldo de propiedad de solo lectura pública () como decimal

Obtener

Devolver saldo de cuenta

Fin Obtener

Propiedad final

Sub postInterés público()

Saldo de cuenta = Saldo de cuenta * (1 tasa de interés)

Fin Sub

SubpostDeposit público (ByVal monto en decimal)

Saldo de cuenta = Saldo de cuenta monto en

End Sub

Public Sub postWithdrawal(ByVal importeOut como decimal)

balance de cuenta = balance de cuenta - importeOut