troubleshooting Question

VB question

Avatar of ube100
ube100Flag for United Kingdom of Great Britain and Northern Ireland asked on
Visual Basic Classic
3 Comments1 Solution135 ViewsLast Modified:
Hi,
I'm currently converting a vb application into c# service. I looked at the staring point for this appliaction which is form load event. This form load event has the following code:

Private Sub Form_Load()
Select Case UCase(Command)
Case "-I", "/I"
     If NTService.Install Then
         MsgBox NTService.DisplayName & _
                " installed successfully."
     Else
         MsgBox NTService.DisplayName & _
                " did not install successfully."
     End If
     End
Case "-U", "/U"
     If NTService.Uninstall Then
         MsgBox NTService.DisplayName & _
                " uninstalled successfully."
     Else
         MsgBox NTService.DisplayName & _
                " did not uninstall successfully."
     End If
     End
Case "-DEBUG"
    'call start up
    Main
   
Case ""
     '-- This code should only run when the
     '   application is started without parameters
     NTService.StartService
Case Else
     '-- This code should only run when the
     '   application is started with invalid
     '   parameters
     MsgBox "The parameter: " & Command & " was is not understood." & vbCrLf & "Try -I  (install) or -U (uninstall)."
     End
End Select
End Sub

As things standing at the moment I don't know what this programm is trying do? Can some body explain to me please. The command line argument was set to "-DEBUG"
 
ASKER CERTIFIED SOLUTION
GrahamSkan
Retired
Join our community to see this answer!
Unlock 1 Answer and 3 Comments.
Start Free Trial
Learn from the best

Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.

Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 1 Answer and 3 Comments.
Try for 7 days

”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.

-Mike Kapnisakis, Warner Bros