Private Sub btnAccounts_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAccounts.Click
        Dim AccPath As String
        Dim arc(3) As String
        arc(0) = "Ravi"
        arc(1) = "1234"
        arc(2) = "he"
        AccPath = My.Application.Info.DirectoryPath
        Process.Start(AccPath & "\Accounts.exe", String.Format("{0} {1} {2}", arc(0), arc(1), arc(2)))
    End Sub