Proxy's

[R3Dx666†]

hey guys i want my bot to use the proxys.txt file i have and i got this code under Public Class Form2 but how can i make a button2 add the proxys?

    Public Structure Struct_INTERNET_PROXY_INFO
        Public dwAccessType As Integer
        Public proxy As IntPtr
        Public proxyBypass As IntPtr
    End Structure
#Region "Proxy"

    ' The Windows API function that allows us to manipulate
    ' IE settings programmatically.
    Private Declare Auto Function InternetSetOption Lib "wininet.dll" _
    (ByVal hInternet As IntPtr, ByVal dwOption As Integer, ByVal lpBuffer As IntPtr, _
     ByVal lpdwBufferLength As Integer) As Boolean

    ' The function we will be using to set the proxy settings.
    Private Sub RefreshIESettings(ByVal strProxy As String)
        Const INTERNET_OPTION_PROXY As Integer = 38
        Const INTERNET_OPEN_TYPE_PROXY As Integer = 3
        Dim struct_IPI As Struct_INTERNET_PROXY_INFO

        ' Filling in structure
        struct_IPI.dwAccessType = INTERNET_OPEN_TYPE_PROXY
        struct_IPI.proxy = System.Runtime.InteropServices.Marshal.StringToHGlobalAnsi(strProxy)
        struct_IPI.proxyBypass = System.Runtime.InteropServices.Marshal.StringToHGlobalAnsi("local")

        ' Allocating memory
        Dim intptrStruct As IntPtr = System.Runtime.InteropServices.Marshal.AllocCoTaskMem(System.Runtime.InteropServices.Marshal.SizeOf(struct_IPI))

        ' Converting structure to IntPtr
        System.Runtime.InteropServices.Marshal.StructureToPtr(struct_IPI, intptrStruct, True)
        Dim iReturn As Boolean = InternetSetOption(IntPtr.Zero, INTERNET_OPTION_PROXY, intptrStruct, System.Runtime.InteropServices.Marshal.SizeOf(struct_IPI))
    End Sub

#End Region

[LilGho$t]

Imports System**** ' system.EyeOh

Class Form2

sub PENIS_BITCHES() Handles Button2.Click ' Om nom me tonight?
' KKKKKKKK
dim sr as streamreader = new streamreader("C:\My Porn\Omg mom get out\Im sorry Ill never masturbate again\*fap fap fap*\fuck, you caught me again\okay, for real i wont fap again\kkkkkkkkkkk *fap fap fap*\<troll face here>\myProxies.txt")
dim myRawDick as string = sr.readtoend
dim lmmaCleanUpDatCum() as string = myRawDick.split(Chr(10)) ' Chr(10) = new line if that errors up, use chrW(10)
dim holyFkIForgotToCleanUpThatCumAndNowMomWantsToComeInAndTalkToMeAboutMyDay_Shit(ImmaCleanUpDatCum.length)  as string = {} ' ip
dim awwDamnSheBroughtAPriestWithHereToRemoveTheDevilFromMyPenis(ImmaCleanUpDatCum.length)  as string= {} ' port
for sperm as integer = 0 to ImmaCleanUpDatCum.length -1
dim ohNoFatherJesusLoverDontSitThere() as string = ImmaCleanUpDatCum(sperm).split(":")
holyFkIForgotToCleanUpThatCumAndNowMomWantsToComeInAndTalkToMeAboutMyDay_Shit(sperm) = ohNoFatherJesusLoverDontSitThere(0)
awwDamnSheBroughtAPriestWithHereToRemoveTheDevilFromMyPenis(sperm) = ohNoFatherJesusLoverDontSitThere(1)
next
end sub

Move around the variables as needed (set them to global if you need them global). Also, leave the code like that so any decompiling crackers can have a good laugh.