Thanks again for your help Prasad
I had previously found this answer but ignored it. I found it useful in finding my final solution.
All I have to do now is link in my input boxes.
Here is the final Solution which calls the user to run the cmd window as administrator (thanks to Kaymaf) and then runs the netsh commands.
change the /k to a /c to hide the cmd prompt window
Private Sub Temp_Click(sender As Object, e As EventArgs) Handles Temp.Click
Dim process As System.Diagnostics.Process = Nothing
Dim processStartInfo As System.Diagnostics.ProcessStartInfo
processStartInfo = New System.Diagnostics.ProcessStartInfo
processStartInfo.FileName = "cmd.exe"
processStartInfo.Verb = "runas"
processStartInfo.Arguments = ""
processStartInfo.Arguments = "/k netsh wlan set hostednetwork mode = allow ssid=MyNetworkID key=12345678 keyUsage=persistent"
processStartInfo.Arguments = "/k netsh wlan start hostednetwork"
processStartInfo.WindowStyle = System.Diagnostics.ProcessWindowStyle.Normal
processStartInfo.UseShellExecute = True
Try
process = System.Diagnostics.Process.Start(processStartInfo)
Catch ex As Exception
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
Finally
If Not (process Is Nothing) Then
process.Dispose()
End If
End Try
End Sub
End Class