Start.vb sofort auf main.vb ohne login

Public Class Start
    Public WebLogin As String = "687474703a2f2f79616e6e69636b6" & "d616d61322e70652" & "e67702f76657273696f6e2e747874"
    Public GetParameter1 As String = "26706173733d"
    Public GetParameter2 As String = "26686172647761726569643d"
    Public GetParameter3 As String = "266b65793d"
    Public GetParameter4 As String = "656d61696c3d"
    Private pInititialized As Boolean
    Private pTable(0 To 255) As Long
    Private Sub cmdLogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdLogin.Click
        Dim CpuData As String = main.GetCPUData()
        My.Settings.email = txtEmail.Text
        My.Settings.password = txtPassword.Text
        Dim newThread As New System.Threading.Thread(AddressOf main.CheckTeleport)
        newThread.Start()
    End Sub
    Public Function Decimal2Hex(ByVal Dec As Integer) As String
        Return Dec.ToString("X")
    End Function
    Private Sub Start_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'If Security.DebuggerCheck() = False Then Application.Exit()
        MsgBox(Decimal2Hex(10))
        Me.txtEmail.Text = My.Settings.email
        Me.txtPassword.Text = My.Settings.password
    End Sub
End Class