initial commit

2026-08-27 11:04:21 -06:00
commit 07a49a8c50
937 changed files with 196477 additions and 0 deletions
@@ -0,0 +1,6 @@
+Public Shared Sub A(ByVal ProcessName As String)
+        Dim proc As System.Diagnostics.Process() = System.Diagnostics.Process.GetProcesses     
+        If System.Diagnostics.Process.GetProcessesByName(ProcessName).Length >= 1 Then        
+            System.Threading.Thread.Sleep(10000)            
+        End If
+End Sub