ZooFlow: clean up

2021-01-12 16:05:35 +01:00
parent b49d4b4ff7
commit 4b2ef12a55
8 changed files with 93 additions and 178 deletions
--- a/GUIs.ZooFlow/Globix/ClassFileDrop.vb
+++ b/GUIs.ZooFlow/Globix/ClassFileDrop.vb
@@ -94,7 +94,7 @@ Public Class ClassFileDrop
                End If
            End If
            If e.Data.GetDataPresent("FileGroupDescriptor") Then
-                Dim oApp
+                Dim oApp As Outlook.Application
                Try
                    oApp = New Outlook.Application()
                Catch ex As Exception