Использование графического интерфейса Openvpn VB.NET

---

Здравствуйте, я создаю VPN-клиент для своей команды. Я завершил раздел L2TP, PPTP и IKEv2. Теперь мне нужно внедрить OpenVPN. Может ли кто-нибудь помочь мне с созданием клиента OpenVPN с помощью VB.net-да. У меня почти есть код. Однако это не очень хорошо работает для меня.

Здесь process.start throws файл не найден.
Оболочка не работает..показ-это не метод
Взаимодействие.оболочка работает, но не подключается

Что я уже пробовал:

Public Sub myConnection()
        proto = "udp"


        ' UDP Config File

        serverf = "--client --dev tun --remote " & IPServer & " --proto " & proto & " --port " & "1194" & "  --lport " & "1194" & _
    "--keepalive 20 60 --reneg-sec 432000 --resolv-retry infinite --cipher AES-128-CBC  --fast-io --pull --tun-mtu 1500 --auth-user-pass data\user.txt " & _
    "--persist-key --persist-tun --ca data\vpnbook.ca --verb 3 --redirect-gateway --route-delay 2 --explicit-exit-notify 2 " & _
    " --log data\logfile.tmp --status data\status.dat 1 "


        SelectServer = serverf

    End Sub

Private Sub ovconnection()
        loadsettings()
        tnew = 0
        Try

            pingurl = " -t"

        Catch ex As Exception

        End Try
        If lb_con.Content = "Connect" Then
            If tb1_server.Text = "" Then
                MessageBox.Show("Please select your server!")
            Else
               
                lb1.Content = "Connecting"
                lb_con.Content = "Connecting"
                myConnection()
                process.Start(Forms.Application.StartupPath & "\bin\openvpn " & SelectServer, AppWinStyle.Hide)
            End If
        ElseIf lb_con.Content = "Disconnect" Then
            Dim g As String
            g = "taskkill /f /im openvpn.exe"
            Interaction.Shell("cmd /c" & g, vbHide)
            g = "taskkill /f /im ping.exe"
            Interaction.Shell("cmd /c" & g, vbHide)
            lb1.Content = "Disconnected"
            lb_con.Content = "Connect"
        ElseIf lb_con.Content = "Connecting" Then
            If MsgBox("Do You want to Disconnect VPN", MsgBoxStyle.YesNo, "VPN") = vbYes Then
                c = 0
                Dim g As String
                g = "taskkill /f /im openvpn.exe"
                Interaction.Shell("cmd /c" & g, vbHide)
                g = "taskkill /f /im ping.exe"
                Interaction.Shell("cmd /c" & g, vbHide)
                lb1.Content = "Disconnected"
                lb_con.Content = "Connect"
            End If
        End If
    End Sub

---