Form1.vb

Option Explicit On
Imports System.Diagnostics
Imports System.Drawing
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim PythonInstalled As Boolean
        Dim PythonVersion As String = GetPythonVersion(PythonInstalled)
        If PythonInstalled = False Then
            Dim ErrMsg As String = "Either you did not install Python, or Python is not added to PATH environment variable" & vbCrLf
            ErrMsg &= "Would you like to install Python right now?" & vbCrLf & vbCrLf
            ErrMsg &= "Select Yes to download and install Python." & vbCrLf
            ErrMsg &= "Select No to locate Python on your own." & vbCrLf
            ErrMsg &= "Select Cancel to quit this program."
            Dim QueryResult As MsgBoxResult = MsgBox(ErrMsg, vbQuestion + vbYesNoCancel, "Python Error")
            If QueryResult = vbYes Then
                ' Download and Install Python
                Form2.Show()
            ElseIf QueryResult = vbNo Then

            ElseIf QueryResult = vbCancel Then
                End
            End If
        End If
    End Sub
End Class