Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'CREAR VARIABLES
Dim numero_entero As Integer = 27 'La palabra Dim sirve para crear variables,en este caso será el número entero 27.
MsgBox(numero_entero) 'Mostramos en pantalla la variable que acabamos de crear.
'VARIABLE CON UN NÚMERO DECIMAL
Dim numero_decimal As Double = 27.56 'Creamos la variable numero_decimal utilizando Double para utilizar números decimales.
MsgBox(numero_decimal) 'Mostramos en pantalla la variable que acabamos de crear.
'VARIABLE CON UN TEXTO Y CONCATENACIÓN
Dim texto As String = "Bienvenido a " 'Variable texto utilizando String para una cadena de texto.
Dim texto2 As String = "pc-solucion" 'Variable texto2 utilizando String para una cadena de texto.
MsgBox(texto + texto2) 'De esta forma mostramos las dos variables una a continuación de la otra.
'VARIABLE CON UNA FECHA
Dim fecha As Date = "05-11-89" 'Variable fecha utilizando Date.
MsgBox(fecha) 'Mostramos en pantalla la variable que acabamos de crear.
Dim fecha2 As Date = "05-NOV-89" 'Variable fecha2 utilizando el nombre del mes en lugar del número.
MsgBox(fecha2) 'Mostramos en pantalla la variable que acabamos de crear.
End Sub
End Class
