Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Null-object/Visual-Basic/null-object-2.vb
+++ b/Task/Null-object/Visual-Basic/null-object-2.vb
@ -0,0 +1,17 @@
+Public Sub Main()
+Dim v As Variant
+
+' initial state: Empty
+Debug.Assert IsEmpty(v)
+Debug.Assert VarType(v) = vbEmpty
+
+v = 1&
+Debug.Assert VarType(v) = vbLong
+
+' assigning the Null state
+v = Null
+' checking for Null state
+Debug.Assert IsNull(v)
+Debug.Assert VarType(v) = vbNull
+
+End Sub