daily pastebin goal
68%
SHARE
TWEET

more inside that script hub

kitty221 Oct 17th, 2017 147 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Imports System
  2. Imports System.ComponentModel
  3. Imports System.Diagnostics
  4. Imports System.Drawing
  5. Imports System.Management
  6. Imports System.Net
  7. Imports System.Windows.Forms
  8. Imports MaterialSkin
  9. Imports MaterialSkin.Controls
  10. Imports Slave_Hub.Properties
  11.  
  12. Namespace Arpon_AG___Script_Hub
  13.     Public Class MainForm
  14.         Inherits MaterialForm
  15.  
  16.         ' Token: 0x02000004 RID: 4
  17.         Public Sub New()
  18.             Me.InitializeComponent()
  19.             Dim instance As MaterialSkinManager = MaterialSkinManager.Instance
  20.             instance.AddFormToManage(Me)
  21.             instance.Theme = 0
  22.             MyBase.SkinManager.ColorScheme = New ColorScheme(15022389, 13840175, 16764370, 4492031, 16777215)
  23.         End Sub
  24.  
  25.         Private Sub Login_mnu_Load(sender As Object, e As EventArgs)
  26.             Me.timer1.Start()
  27.             Me.timer1.Enabled = True
  28.             Me.timer2.Start()
  29.             Me.timer2.Enabled = True
  30.             Me.timer3.Start()
  31.             Me.timer3.Enabled = True
  32.             Me.timer4.Start()
  33.             Me.timer4.Enabled = True
  34.         End Sub
  35.  
  36.         Private Sub materialFlatButton3_Click(sender As Object, e As EventArgs)
  37.             Dim text As String = String.Empty
  38.             For Each managementBaseObject As ManagementBaseObject In New ManagementClass("win32_processor").GetInstances()
  39.                 Dim managementObject As ManagementObject = CType(managementBaseObject, ManagementObject)
  40.                 If text = "" Then
  41.                     text = managementObject.Properties("processorID").Value.ToString()
  42.                     Exit For
  43.                 End If
  44.             Next
  45.             MessageBox.Show("HWID:" + Me.GetHDDSerial() + text, "Arpon AG - Script Hub")
  46.             Clipboard.SetText(Me.GetHDDSerial() + text)
  47.         End Sub
  48.  
  49.         Private Function GetHDDSerial() As String
  50.             For Each managementBaseObject As ManagementBaseObject In New ManagementObjectSearcher("SELECT * FROM Win32_PhysicalMedia").[Get]()
  51.                 Dim managementObject As ManagementObject = CType(managementBaseObject, ManagementObject)
  52.                 If managementObject("SerialNumber") IsNot Nothing Then
  53.                     Return managementObject("SerialNumber").ToString()
  54.                 End If
  55.             Next
  56.             Return String.Empty
  57.         End Function
  58.  
  59.         Private Sub materialFlatButton2_Click(sender As Object, e As EventArgs)
  60.             Dim text As String = String.Empty
  61.             For Each managementBaseObject As ManagementBaseObject In New ManagementClass("win32_processor").GetInstances()
  62.                 Dim managementObject As ManagementObject = CType(managementBaseObject, ManagementObject)
  63.                 If text = "" Then
  64.                     text = managementObject.Properties("processorID").Value.ToString()
  65.                     Exit For
  66.                 End If
  67.             Next
  68.             Dim webClient As WebClient = New WebClient()
  69.             Dim now As DateTime = DateTime.Now
  70.             webClient.DownloadString(String.Concat(New Object() { "https://hwidlist-slavehub.000webhostapp.com/hwidlog.php?text=", Me.GetHDDSerial(), " = ", text, " =  = ", now }))
  71.             Dim webClient2 As WebClient = New WebClient()
  72.             Dim text2 As String = webClient2.DownloadString("https://lynxhosting.website/crackedshit/shittyhubs.txt")
  73.             Dim text3 As String = webClient2.DownloadString("https://lynxhosting.website/crackedshit/shittyhubs.txt")
  74.             If text2.Contains("do not show") Then
  75.                 MessageBox.Show("You have been banned from Slave Hub'.", "Slave Hub")
  76.                 Environment.[Exit](-1)
  77.                 Return
  78.             End If
  79.             If text3.Contains("show") Then
  80.                 MessageBox.Show("Cracked By Skid Busters", "l33t haxor'd")
  81.                 New Form2().Show()
  82.                 MyBase.Hide()
  83.                 Return
  84.             End If
  85.             MessageBox.Show("/shrug", "l33t haxor'd")
  86.             Environment.[Exit](-1)
  87.         End Sub
  88.  
  89.         Private Sub textBox1_TextChanged(sender As Object, e As EventArgs)
  90.         End Sub
  91.  
  92.         Private Sub timer1_Tick(sender As Object, e As EventArgs)
  93.             Dim random As Random = New Random()
  94.             Dim alpha As Integer = random.[Next](0, 255)
  95.             Dim red As Integer = random.[Next](0, 255)
  96.             Dim green As Integer = random.[Next](0, 255)
  97.             Dim blue As Integer = random.[Next](0, 255)
  98.             Me.label12.ForeColor = Color.FromArgb(alpha, red, green, blue)
  99.         End Sub
  100.  
  101.         Private Sub label12_Click(sender As Object, e As EventArgs)
  102.         End Sub
  103.  
  104.         Private Sub label13_Click(sender As Object, e As EventArgs)
  105.         End Sub
  106.  
  107.         Private Sub timer2_Tick(sender As Object, e As EventArgs)
  108.             Dim random As Random = New Random()
  109.             Dim alpha As Integer = random.[Next](0, 255)
  110.             Dim red As Integer = random.[Next](0, 255)
  111.             Dim green As Integer = random.[Next](0, 255)
  112.             Dim blue As Integer = random.[Next](0, 255)
  113.             Me.label13.ForeColor = Color.FromArgb(alpha, red, green, blue)
  114.         End Sub
  115.  
  116.         Private Sub label14_Click(sender As Object, e As EventArgs)
  117.         End Sub
  118.  
  119.         Private Sub timer3_Tick(sender As Object, e As EventArgs)
  120.             Dim random As Random = New Random()
  121.             Dim alpha As Integer = random.[Next](0, 255)
  122.             Dim red As Integer = random.[Next](0, 255)
  123.             Dim green As Integer = random.[Next](0, 255)
  124.             Dim blue As Integer = random.[Next](0, 255)
  125.             Me.label14.ForeColor = Color.FromArgb(alpha, red, green, blue)
  126.         End Sub
  127.  
  128.         Private Sub label15_Click(sender As Object, e As EventArgs)
  129.         End Sub
  130.  
  131.         Private Sub timer4_Tick(sender As Object, e As EventArgs)
  132.             Dim random As Random = New Random()
  133.             Dim alpha As Integer = random.[Next](0, 255)
  134.             Dim red As Integer = random.[Next](0, 255)
  135.             Dim green As Integer = random.[Next](0, 255)
  136.             Dim blue As Integer = random.[Next](0, 255)
  137.             Me.label15.ForeColor = Color.FromArgb(alpha, red, green, blue)
  138.         End Sub
  139.  
  140.         Private Sub materialRaisedButton11_Click(sender As Object, e As EventArgs)
  141.         End Sub
  142.  
  143.         Private Sub button1_Click(sender As Object, e As EventArgs)
  144.         End Sub
  145.  
  146.         Private Sub materialFlatButton4_Click(sender As Object, e As EventArgs)
  147.             Dim text As String = String.Empty
  148.             For Each managementBaseObject As ManagementBaseObject In New ManagementClass("win32_processor").GetInstances()
  149.                 Dim managementObject As ManagementObject = CType(managementBaseObject, ManagementObject)
  150.                 If text = "" Then
  151.                     text = managementObject.Properties("processorID").Value.ToString()
  152.                     Exit For
  153.                 End If
  154.             Next
  155.             MessageBox.Show("HWID:" + Me.GetHDDSerial() + text, "Arpon AG - Script Hub")
  156.             Clipboard.SetText(Me.GetHDDSerial() + text)
  157.         End Sub
  158.  
  159.         Private Sub materialFlatButton4_Click_1(sender As Object, e As EventArgs)
  160.             Dim text As String = String.Empty
  161.             For Each managementBaseObject As ManagementBaseObject In New ManagementClass("win32_processor").GetInstances()
  162.                 Dim managementObject As ManagementObject = CType(managementBaseObject, ManagementObject)
  163.                 If text = "" Then
  164.                     text = managementObject.Properties("processorID").Value.ToString()
  165.                     Exit For
  166.                 End If
  167.             Next
  168.             MessageBox.Show("HWID:" + Me.GetHDDSerial() + text, "Arpon AG - Script Hub")
  169.             Clipboard.SetText(Me.GetHDDSerial() + text)
  170.         End Sub
  171.  
  172.         Private Sub materialFlatButton1_Click(sender As Object, e As EventArgs)
  173.             If Me.usrTxt.Text = Settings.[Default].Username AndAlso Me.pasTxt.Text = Settings.[Default].Password Then
  174.                 MessageBox.Show(Me, "Cracked By Skid Busters", "l33t haxor'd")
  175.             ElseIf Me.pasTxt.Text <> Settings.[Default].Password Then
  176.                 MessageBox.Show(Me, "Wrong Password", "Error")
  177.             End If
  178.             If Me.pasTxt.Text <> Settings.[Default].Password Then
  179.                 MyBase.Close()
  180.             End If
  181.             If Me.pasTxt.Text <> Settings.[Default].Password Then
  182.                 MyBase.Close()
  183.             End If
  184.             New Form2().Show()
  185.             MyBase.Hide()
  186.         End Sub
  187.  
  188.         Private Sub materialRaisedButton45_Click(sender As Object, e As EventArgs)
  189.             Process.Start("https://lynxhosting.website/")
  190.         End Sub
  191.  
  192.         Protected Overrides Sub Dispose(disposing As Boolean)
  193.             If disposing AndAlso Me.components IsNot Nothing Then
  194.                 Me.components.Dispose()
  195.             End If
  196.             MyBase.Dispose(disposing)
  197.         End Sub
  198.  
  199.         Private Sub InitializeComponent()
  200.             Me.components = New Container()
  201.             Dim componentResourceManager As ComponentResourceManager = New ComponentResourceManager(GetType(MainForm))
  202.             Me.materialFlatButton3 = New MaterialFlatButton()
  203.             Me.materialFlatButton2 = New MaterialFlatButton()
  204.             Me.label1 = New Label()
  205.             Me.pictureBox4 = New PictureBox()
  206.             Me.pictureBox3 = New PictureBox()
  207.             Me.pictureBox2 = New PictureBox()
  208.             Me.pictureBox1 = New PictureBox()
  209.             Me.label12 = New Label()
  210.             Me.label13 = New Label()
  211.             Me.label14 = New Label()
  212.             Me.label15 = New Label()
  213.             Me.timer1 = New Timer(Me.components)
  214.             Me.timer2 = New Timer(Me.components)
  215.             Me.timer3 = New Timer(Me.components)
  216.             Me.timer4 = New Timer(Me.components)
  217.             Me.materialSingleLineTextField2 = New MaterialSingleLineTextField()
  218.             Me.usrTxt = New MaterialSingleLineTextField()
  219.             Me.pasTxt = New MaterialSingleLineTextField()
  220.             Me.materialSingleLineTextField1 = New MaterialSingleLineTextField()
  221.             Me.materialFlatButton1 = New MaterialFlatButton()
  222.             Me.materialRaisedButton45 = New MaterialRaisedButton()
  223.             CType(Me.pictureBox4, ISupportInitialize).BeginInit()
  224.             CType(Me.pictureBox3, ISupportInitialize).BeginInit()
  225.             CType(Me.pictureBox2, ISupportInitialize).BeginInit()
  226.             CType(Me.pictureBox1, ISupportInitialize).BeginInit()
  227.             MyBase.SuspendLayout()
  228.             Me.materialFlatButton3.AutoSize = True
  229.             Me.materialFlatButton3.AutoSizeMode = AutoSizeMode.GrowAndShrink
  230.             Me.materialFlatButton3.BackColor = Color.Transparent
  231.             Me.materialFlatButton3.Depth = 0
  232.             Me.materialFlatButton3.Icon = Nothing
  233.             Me.materialFlatButton3.Location = New Point(128, 166)
  234.             Me.materialFlatButton3.Margin = New Padding(4, 6, 4, 6)
  235.             Me.materialFlatButton3.MouseState = 0
  236.             Me.materialFlatButton3.Name = "materialFlatButton3"
  237.             Me.materialFlatButton3.Primary = False
  238.             Me.materialFlatButton3.Size = New Size(84, 36)
  239.             Me.materialFlatButton3.TabIndex = 31
  240.             Me.materialFlatButton3.Text = "Get HWID"
  241.             Me.materialFlatButton3.UseVisualStyleBackColor = False
  242.             AddHandler Me.materialFlatButton3.Click, AddressOf Me.materialFlatButton3_Click
  243.             Me.materialFlatButton2.AutoSize = True
  244.             Me.materialFlatButton2.AutoSizeMode = AutoSizeMode.GrowAndShrink
  245.             Me.materialFlatButton2.BackColor = Color.Snow
  246.             Me.materialFlatButton2.Depth = 0
  247.             Me.materialFlatButton2.Icon = Nothing
  248.             Me.materialFlatButton2.Location = New Point(220, 165)
  249.             Me.materialFlatButton2.Margin = New Padding(4, 6, 4, 6)
  250.             Me.materialFlatButton2.MouseState = 0
  251.             Me.materialFlatButton2.Name = "materialFlatButton2"
  252.             Me.materialFlatButton2.Primary = False
  253.             Me.materialFlatButton2.Size = New Size(103, 36)
  254.             Me.materialFlatButton2.TabIndex = 30
  255.             Me.materialFlatButton2.Text = "HWID Login!"
  256.             Me.materialFlatButton2.UseVisualStyleBackColor = False
  257.             AddHandler Me.materialFlatButton2.Click, AddressOf Me.materialFlatButton2_Click
  258.             Me.label1.AutoSize = True
  259.             Me.label1.Location = New Point(1, 205)
  260.             Me.label1.Name = "label1"
  261.             Me.label1.Size = New Size(146, 13)
  262.             Me.label1.TabIndex = 32
  263.             Me.label1.Text = "this was made by end gaming"
  264.             Me.pictureBox4.Image = Resources.end__logoo1
  265.             Me.pictureBox4.Location = New Point(2, 97)
  266.             Me.pictureBox4.Name = "pictureBox4"
  267.             Me.pictureBox4.Size = New Size(27, 31)
  268.             Me.pictureBox4.TabIndex = 36
  269.             Me.pictureBox4.TabStop = False
  270.             Me.pictureBox3.Image = Resources.Untitled2
  271.             Me.pictureBox3.Location = New Point(2, 134)
  272.             Me.pictureBox3.Name = "pictureBox3"
  273.             Me.pictureBox3.Size = New Size(27, 31)
  274.             Me.pictureBox3.TabIndex = 35
  275.             Me.pictureBox3.TabStop = False
  276.             Me.pictureBox2.Image = Resources._11112221
  277.             Me.pictureBox2.Location = New Point(2, 171)
  278.             Me.pictureBox2.Name = "pictureBox2"
  279.             Me.pictureBox2.Size = New Size(27, 31)
  280.             Me.pictureBox2.TabIndex = 34
  281.             Me.pictureBox2.TabStop = False
  282.             Me.pictureBox1.Image = Resources._1231231
  283.             Me.pictureBox1.Location = New Point(2, 64)
  284.             Me.pictureBox1.Name = "pictureBox1"
  285.             Me.pictureBox1.Size = New Size(29, 31)
  286.             Me.pictureBox1.TabIndex = 33
  287.             Me.pictureBox1.TabStop = False
  288.             Me.label12.Font = New Font("Microsoft Sans Serif", 9F, FontStyle.Regular, GraphicsUnit.Point, 177)
  289.             Me.label12.Location = New Point(37, 77)
  290.             Me.label12.Name = "label12"
  291.             Me.label12.Size = New Size(63, 18)
  292.             Me.label12.TabIndex = 37
  293.             Me.label12.Text = "TexasHD"
  294.             AddHandler Me.label12.Click, AddressOf Me.label12_Click
  295.             Me.label13.AutoSize = True
  296.             Me.label13.Font = New Font("Microsoft Sans Serif", 9F, FontStyle.Regular, GraphicsUnit.Point, 177)
  297.             Me.label13.Location = New Point(35, 104)
  298.             Me.label13.Name = "label13"
  299.             Me.label13.Size = New Size(76, 15)
  300.             Me.label13.TabIndex = 38
  301.             Me.label13.Text = "End Gaming"
  302.             AddHandler Me.label13.Click, AddressOf Me.label13_Click
  303.             Me.label14.AutoSize = True
  304.             Me.label14.Font = New Font("Microsoft Sans Serif", 8.25F, FontStyle.Regular, GraphicsUnit.Point, 177)
  305.             Me.label14.Location = New Point(32, 152)
  306.             Me.label14.Name = "label14"
  307.             Me.label14.Size = New Size(86, 13)
  308.             Me.label14.TabIndex = 39
  309.             Me.label14.Text = "Pkamara's Slave"
  310.             AddHandler Me.label14.Click, AddressOf Me.label14_Click
  311.             Me.label15.AutoSize = True
  312.             Me.label15.Font = New Font("Microsoft Sans Serif", 9F, FontStyle.Regular, GraphicsUnit.Point, 177)
  313.             Me.label15.Location = New Point(32, 184)
  314.             Me.label15.Name = "label15"
  315.             Me.label15.Size = New Size(49, 15)
  316.             Me.label15.TabIndex = 40
  317.             Me.label15.Text = "settings"
  318.             AddHandler Me.label15.Click, AddressOf Me.label15_Click
  319.             AddHandler Me.timer1.Tick, AddressOf Me.timer1_Tick
  320.             AddHandler Me.timer2.Tick, AddressOf Me.timer2_Tick
  321.             AddHandler Me.timer3.Tick, AddressOf Me.timer3_Tick
  322.             AddHandler Me.timer4.Tick, AddressOf Me.timer4_Tick
  323.             Me.materialSingleLineTextField2.BackColor = Color.Snow
  324.             Me.materialSingleLineTextField2.Depth = 0
  325.             Me.materialSingleLineTextField2.Enabled = False
  326.             Me.materialSingleLineTextField2.Hint = ""
  327.             Me.materialSingleLineTextField2.Location = New Point(130, 133)
  328.             Me.materialSingleLineTextField2.MaxLength = 32767
  329.             Me.materialSingleLineTextField2.MouseState = 0
  330.             Me.materialSingleLineTextField2.Name = "materialSingleLineTextField2"
  331.             Me.materialSingleLineTextField2.PasswordChar = vbNullChar
  332.             Me.materialSingleLineTextField2.SelectedText = ""
  333.             Me.materialSingleLineTextField2.SelectionLength = 0
  334.             Me.materialSingleLineTextField2.SelectionStart = 0
  335.             Me.materialSingleLineTextField2.Size = New Size(84, 23)
  336.             Me.materialSingleLineTextField2.TabIndex = 45
  337.             Me.materialSingleLineTextField2.TabStop = False
  338.             Me.materialSingleLineTextField2.Text = " Password:"
  339.             Me.materialSingleLineTextField2.UseSystemPasswordChar = False
  340.             Me.usrTxt.BackColor = Color.Snow
  341.             Me.usrTxt.Depth = 0
  342.             Me.usrTxt.Hint = ""
  343.             Me.usrTxt.Location = New Point(213, 104)
  344.             Me.usrTxt.MaxLength = 32767
  345.             Me.usrTxt.MouseState = 0
  346.             Me.usrTxt.Name = "usrTxt"
  347.             Me.usrTxt.PasswordChar = vbNullChar
  348.             Me.usrTxt.SelectedText = ""
  349.             Me.usrTxt.SelectionLength = 0
  350.             Me.usrTxt.SelectionStart = 0
  351.             Me.usrTxt.Size = New Size(183, 23)
  352.             Me.usrTxt.TabIndex = 41
  353.             Me.usrTxt.TabStop = False
  354.             Me.usrTxt.UseSystemPasswordChar = False
  355.             Me.pasTxt.BackColor = Color.Snow
  356.             Me.pasTxt.Depth = 0
  357.             Me.pasTxt.Hint = ""
  358.             Me.pasTxt.Location = New Point(214, 133)
  359.             Me.pasTxt.MaxLength = 32767
  360.             Me.pasTxt.MouseState = 0
  361.             Me.pasTxt.Name = "pasTxt"
  362.             Me.pasTxt.PasswordChar = vbNullChar
  363.             Me.pasTxt.SelectedText = ""
  364.             Me.pasTxt.SelectionLength = 0
  365.             Me.pasTxt.SelectionStart = 0
  366.             Me.pasTxt.Size = New Size(183, 23)
  367.             Me.pasTxt.TabIndex = 42
  368.             Me.pasTxt.TabStop = False
  369.             Me.pasTxt.UseSystemPasswordChar = False
  370.             Me.materialSingleLineTextField1.BackColor = Color.Snow
  371.             Me.materialSingleLineTextField1.Depth = 0
  372.             Me.materialSingleLineTextField1.Enabled = False
  373.             Me.materialSingleLineTextField1.Hint = ""
  374.             Me.materialSingleLineTextField1.Location = New Point(130, 104)
  375.             Me.materialSingleLineTextField1.MaxLength = 32767
  376.             Me.materialSingleLineTextField1.MouseState = 0
  377.             Me.materialSingleLineTextField1.Name = "materialSingleLineTextField1"
  378.             Me.materialSingleLineTextField1.PasswordChar = vbNullChar
  379.             Me.materialSingleLineTextField1.SelectedText = ""
  380.             Me.materialSingleLineTextField1.SelectionLength = 0
  381.             Me.materialSingleLineTextField1.SelectionStart = 0
  382.             Me.materialSingleLineTextField1.Size = New Size(84, 23)
  383.             Me.materialSingleLineTextField1.TabIndex = 44
  384.             Me.materialSingleLineTextField1.TabStop = False
  385.             Me.materialSingleLineTextField1.Text = " Username:"
  386.             Me.materialSingleLineTextField1.UseSystemPasswordChar = False
  387.             Me.materialFlatButton1.AutoSize = True
  388.             Me.materialFlatButton1.AutoSizeMode = AutoSizeMode.GrowAndShrink
  389.             Me.materialFlatButton1.BackColor = Color.Snow
  390.             Me.materialFlatButton1.Depth = 0
  391.             Me.materialFlatButton1.Icon = Nothing
  392.             Me.materialFlatButton1.Location = New Point(331, 162)
  393.             Me.materialFlatButton1.Margin = New Padding(4, 6, 4, 6)
  394.             Me.materialFlatButton1.MouseState = 0
  395.             Me.materialFlatButton1.Name = "materialFlatButton1"
  396.             Me.materialFlatButton1.Primary = False
  397.             Me.materialFlatButton1.Size = New Size(65, 36)
  398.             Me.materialFlatButton1.TabIndex = 43
  399.             Me.materialFlatButton1.Text = "Login!"
  400.             Me.materialFlatButton1.UseVisualStyleBackColor = False
  401.             AddHandler Me.materialFlatButton1.Click, AddressOf Me.materialFlatButton1_Click
  402.             Me.materialRaisedButton45.AutoSizeMode = AutoSizeMode.GrowAndShrink
  403.             Me.materialRaisedButton45.BackColor = SystemColors.WindowFrame
  404.             Me.materialRaisedButton45.Depth = 0
  405.             Me.materialRaisedButton45.ForeColor = SystemColors.ControlLightLight
  406.             Me.materialRaisedButton45.Icon = Nothing
  407.             Me.materialRaisedButton45.Location = New Point(153, 197)
  408.             Me.materialRaisedButton45.MouseState = 0
  409.             Me.materialRaisedButton45.Name = "materialRaisedButton45"
  410.             Me.materialRaisedButton45.Primary = True
  411.             Me.materialRaisedButton45.Size = New Size(84, 18)
  412.             Me.materialRaisedButton45.TabIndex = 49
  413.             Me.materialRaisedButton45.Text = "sub to me"
  414.             Me.materialRaisedButton45.UseVisualStyleBackColor = False
  415.             AddHandler Me.materialRaisedButton45.Click, AddressOf Me.materialRaisedButton45_Click
  416.             MyBase.AutoScaleDimensions = New SizeF(6F, 13F)
  417.             MyBase.AutoScaleMode = AutoScaleMode.Font
  418.             MyBase.ClientSize = New Size(398, 227)
  419.             MyBase.Controls.Add(Me.materialRaisedButton45)
  420.             MyBase.Controls.Add(Me.materialSingleLineTextField2)
  421.             MyBase.Controls.Add(Me.usrTxt)
  422.             MyBase.Controls.Add(Me.pasTxt)
  423.             MyBase.Controls.Add(Me.materialSingleLineTextField1)
  424.             MyBase.Controls.Add(Me.materialFlatButton1)
  425.             MyBase.Controls.Add(Me.label15)
  426.             MyBase.Controls.Add(Me.label14)
  427.             MyBase.Controls.Add(Me.label13)
  428.             MyBase.Controls.Add(Me.label12)
  429.             MyBase.Controls.Add(Me.pictureBox4)
  430.             MyBase.Controls.Add(Me.pictureBox3)
  431.             MyBase.Controls.Add(Me.pictureBox2)
  432.             MyBase.Controls.Add(Me.pictureBox1)
  433.             MyBase.Controls.Add(Me.label1)
  434.             MyBase.Controls.Add(Me.materialFlatButton2)
  435.             MyBase.Controls.Add(Me.materialFlatButton3)
  436.             MyBase.Icon = CType(componentResourceManager.GetObject("$this.Icon"), Icon)
  437.             MyBase.MaximizeBox = False
  438.             MyBase.Name = "MainForm"
  439.             MyBase.Sizable = False
  440.             MyBase.StartPosition = FormStartPosition.CenterScreen
  441.             Me.Text = "Slave Hub | Cracked By: Skid Busters"
  442.             AddHandler MyBase.Load, AddressOf Me.Login_mnu_Load
  443.             CType(Me.pictureBox4, ISupportInitialize).EndInit()
  444.             CType(Me.pictureBox3, ISupportInitialize).EndInit()
  445.             CType(Me.pictureBox2, ISupportInitialize).EndInit()
  446.             CType(Me.pictureBox1, ISupportInitialize).EndInit()
  447.             MyBase.ResumeLayout(False)
  448.             MyBase.PerformLayout()
  449.         End Sub
  450.  
  451.         Private components As IContainer
  452.  
  453.         Private materialFlatButton3 As MaterialFlatButton
  454.  
  455.         Private materialFlatButton2 As MaterialFlatButton
  456.  
  457.         Private label1 As Label
  458.  
  459.         Private pictureBox1 As PictureBox
  460.  
  461.         Private pictureBox2 As PictureBox
  462.  
  463.         Private pictureBox3 As PictureBox
  464.  
  465.         Private pictureBox4 As PictureBox
  466.  
  467.         Private label12 As Label
  468.  
  469.         Private label13 As Label
  470.  
  471.         Private label14 As Label
  472.  
  473.         Private label15 As Label
  474.  
  475.         Private timer1 As Timer
  476.  
  477.         Private timer2 As Timer
  478.  
  479.         Private timer3 As Timer
  480.  
  481.         Private timer4 As Timer
  482.  
  483.         Private materialSingleLineTextField2 As MaterialSingleLineTextField
  484.  
  485.         Private usrTxt As MaterialSingleLineTextField
  486.  
  487.         Private pasTxt As MaterialSingleLineTextField
  488.  
  489.         Private materialSingleLineTextField1 As MaterialSingleLineTextField
  490.  
  491.         Private materialFlatButton1 As MaterialFlatButton
  492.  
  493.         Private materialRaisedButton45 As MaterialRaisedButton
  494.     End Class
  495. End Namespace
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top