Valor inicial - II

Por otro lado podemos, inversamente, inicializar una variable que ya tiene valor, asignándole la palabra clave Nothing; con ello, la variable pasa a tener el valor por defecto o inicial. Ver el Código fuente 34.

Sub Main()

Dim Valor As String

Dim FhActual As Date

Dim ValorLogico As Boolean

' asignar valores a variables

Valor = "mesa"

FhActual = "10/8/2001"

ValorLogico = True

' inicializar variables

Valor = Nothing

FhActual = Nothing

ValorLogico = Nothing

' mostrar variables en la consola

Console.WriteLine("Variable Valor: {0}", Valor)

Console.WriteLine("Variable FhActual: {0}", FhActual)

Console.WriteLine("Variable ValorLogico: {0}", ValorLogico)

Console.ReadLine()

End Sub

Código fuente 34