June 2018 Update

2018-06-22 20:57:24 +00:00 · 2018-06-22 20:57:24 +00:00 · 22f33d4004
commit 22f33d4004
parent ba8067c3b7
5278 changed files with 84726 additions and 14379 deletions
--- a/Task/Null-object/Visual-Basic/null-object-1.vb
+++ b/Task/Null-object/Visual-Basic/null-object-1.vb
@ -0,0 +1,15 @@
+Public Sub Main()
+Dim c As VBA.Collection
+
+' initial state: Nothing
+Debug.Assert c Is Nothing
+
+' create an instance
+Set c = New VBA.Collection
+Debug.Assert Not c Is Nothing
+
+' release the instance
+Set c = Nothing
+Debug.Assert c Is Nothing
+
+End Sub