added more buttons, still on the design part

2024-06-03 10:27:23 +08:00
parent 8006a437f5
commit 585c30ee2d
10 changed files with 353 additions and 105 deletions
@@ -47,6 +47,9 @@
  <PropertyGroup>
    <OptionInfer>On</OptionInfer>
  </PropertyGroup>
+  <PropertyGroup>
+    <ApplicationManifest>app.manifest</ApplicationManifest>
+  </PropertyGroup>
  <ItemGroup>
    <Reference Include="MetroFramework, Version=1.4.0.0, Culture=neutral, PublicKeyToken=5f91a84759bf584a, processorArchitecture=MSIL">
      <HintPath>..\packages\MetroModernUI.1.4.0.0\lib\net\MetroFramework.dll</HintPath>
@@ -99,6 +102,7 @@
    <Compile Include="My Project\Application.Designer.vb">
      <AutoGen>True</AutoGen>
      <DependentUpon>Application.myapp</DependentUpon>
+      <DesignTime>True</DesignTime>
    </Compile>
    <Compile Include="My Project\Resources.Designer.vb">
      <AutoGen>True</AutoGen>
@@ -126,6 +130,7 @@
    </EmbeddedResource>
  </ItemGroup>
  <ItemGroup>
+    <None Include="app.manifest" />
    <None Include="My Project\Application.myapp">
      <Generator>MyApplicationCodeGenerator</Generator>
      <LastGenOutput>Application.Designer.vb</LastGenOutput>
@@ -33,9 +33,11 @@ Partial Class Import
        Me.Panel6 = New System.Windows.Forms.Panel()
        Me.Panel7 = New System.Windows.Forms.Panel()
        Me.Panel12 = New System.Windows.Forms.Panel()
+        Me.ListBox1 = New System.Windows.Forms.ListBox()
        Me.Panel11 = New System.Windows.Forms.Panel()
        Me.Label4 = New System.Windows.Forms.Label()
        Me.Panel10 = New System.Windows.Forms.Panel()
+        Me.btnRemove = New MetroFramework.Controls.MetroButton()
        Me.btnBrowse = New MetroFramework.Controls.MetroButton()
        Me.Panel13 = New System.Windows.Forms.Panel()
        Me.Panel9 = New System.Windows.Forms.Panel()
@@ -44,18 +46,18 @@ Partial Class Import
        Me.Panel15 = New System.Windows.Forms.Panel()
        Me.Panel16 = New System.Windows.Forms.Panel()
        Me.Panel17 = New System.Windows.Forms.Panel()
-        Me.btnRemove = New MetroFramework.Controls.MetroButton()
-        Me.ListBox1 = New System.Windows.Forms.ListBox()
-        Me.Panel18 = New System.Windows.Forms.Panel()
-        Me.Panel19 = New System.Windows.Forms.Panel()
-        Me.Panel20 = New System.Windows.Forms.Panel()
-        Me.Panel21 = New System.Windows.Forms.Panel()
        Me.Label5 = New System.Windows.Forms.Label()
-        Me.Panel22 = New System.Windows.Forms.Panel()
-        Me.Panel23 = New System.Windows.Forms.Panel()
+        Me.Panel21 = New System.Windows.Forms.Panel()
+        Me.Panel20 = New System.Windows.Forms.Panel()
+        Me.Panel19 = New System.Windows.Forms.Panel()
+        Me.Panel18 = New System.Windows.Forms.Panel()
        Me.Panel24 = New System.Windows.Forms.Panel()
-        Me.Label6 = New System.Windows.Forms.Label()
+        Me.Panel23 = New System.Windows.Forms.Panel()
        Me.MetroComboBox1 = New MetroFramework.Controls.MetroComboBox()
+        Me.Label6 = New System.Windows.Forms.Label()
+        Me.Panel22 = New System.Windows.Forms.Panel()
+        Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
+        Me.btnAccept = New System.Windows.Forms.Button()
        Me.Panel4.SuspendLayout()
        Me.Panel7.SuspendLayout()
        Me.Panel12.SuspendLayout()
@@ -110,7 +112,7 @@ Partial Class Import
        Me.Label3.Location = New System.Drawing.Point(164, 3)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(49, 17)
-        Me.Label3.TabIndex = 9
+        Me.Label3.TabIndex = 2
        Me.Label3.Text = "Paste"
        '
        'Label2
@@ -121,7 +123,7 @@ Partial Class Import
        Me.Label2.Location = New System.Drawing.Point(121, 3)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(34, 17)
-        Me.Label2.TabIndex = 8
+        Me.Label2.TabIndex = 1
        Me.Label2.Text = "File"
        '
        'Label1
@@ -172,6 +174,17 @@ Partial Class Import
        Me.Panel12.Size = New System.Drawing.Size(271, 186)
        Me.Panel12.TabIndex = 9
        '
+        'ListBox1
+        '
+        Me.ListBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer))
+        Me.ListBox1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.ListBox1.FormattingEnabled = True
+        Me.ListBox1.ItemHeight = 16
+        Me.ListBox1.Location = New System.Drawing.Point(0, 0)
+        Me.ListBox1.Name = "ListBox1"
+        Me.ListBox1.Size = New System.Drawing.Size(271, 186)
+        Me.ListBox1.TabIndex = 1
+        '
        'Panel11
        '
        Me.Panel11.Controls.Add(Me.Label4)
@@ -203,13 +216,26 @@ Partial Class Import
        Me.Panel10.Size = New System.Drawing.Size(81, 219)
        Me.Panel10.TabIndex = 5
        '
+        'btnRemove
+        '
+        Me.btnRemove.Dock = System.Windows.Forms.DockStyle.Top
+        Me.btnRemove.FontSize = MetroFramework.MetroButtonSize.Medium
+        Me.btnRemove.Location = New System.Drawing.Point(0, 67)
+        Me.btnRemove.Name = "btnRemove"
+        Me.btnRemove.Size = New System.Drawing.Size(81, 35)
+        Me.btnRemove.TabIndex = 4
+        Me.btnRemove.Text = "Remove"
+        Me.btnRemove.Theme = MetroFramework.MetroThemeStyle.Dark
+        Me.btnRemove.UseSelectable = True
+        '
        'btnBrowse
        '
        Me.btnBrowse.Dock = System.Windows.Forms.DockStyle.Top
+        Me.btnBrowse.FontSize = MetroFramework.MetroButtonSize.Medium
        Me.btnBrowse.Location = New System.Drawing.Point(0, 32)
        Me.btnBrowse.Name = "btnBrowse"
        Me.btnBrowse.Size = New System.Drawing.Size(81, 35)
-        Me.btnBrowse.TabIndex = 4
+        Me.btnBrowse.TabIndex = 3
        Me.btnBrowse.Text = "Browse"
        Me.btnBrowse.Theme = MetroFramework.MetroThemeStyle.Dark
        Me.btnBrowse.UseSelectable = True
@@ -274,63 +300,6 @@ Partial Class Import
        Me.Panel17.Size = New System.Drawing.Size(342, 47)
        Me.Panel17.TabIndex = 14
        '
-        'btnRemove
-        '
-        Me.btnRemove.Dock = System.Windows.Forms.DockStyle.Top
-        Me.btnRemove.Location = New System.Drawing.Point(0, 67)
-        Me.btnRemove.Name = "btnRemove"
-        Me.btnRemove.Size = New System.Drawing.Size(81, 35)
-        Me.btnRemove.TabIndex = 5
-        Me.btnRemove.Text = "Remove"
-        Me.btnRemove.Theme = MetroFramework.MetroThemeStyle.Dark
-        Me.btnRemove.UseSelectable = True
-        '
-        'ListBox1
-        '
-        Me.ListBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer))
-        Me.ListBox1.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.ListBox1.FormattingEnabled = True
-        Me.ListBox1.ItemHeight = 16
-        Me.ListBox1.Location = New System.Drawing.Point(0, 0)
-        Me.ListBox1.Name = "ListBox1"
-        Me.ListBox1.Size = New System.Drawing.Size(271, 186)
-        Me.ListBox1.TabIndex = 1
-        '
-        'Panel18
-        '
-        Me.Panel18.Controls.Add(Me.Panel24)
-        Me.Panel18.Controls.Add(Me.Panel23)
-        Me.Panel18.Controls.Add(Me.Panel22)
-        Me.Panel18.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.Panel18.Location = New System.Drawing.Point(20, 350)
-        Me.Panel18.Name = "Panel18"
-        Me.Panel18.Size = New System.Drawing.Size(342, 192)
-        Me.Panel18.TabIndex = 16
-        '
-        'Panel19
-        '
-        Me.Panel19.Dock = System.Windows.Forms.DockStyle.Left
-        Me.Panel19.Location = New System.Drawing.Point(0, 0)
-        Me.Panel19.Name = "Panel19"
-        Me.Panel19.Size = New System.Drawing.Size(12, 47)
-        Me.Panel19.TabIndex = 4
-        '
-        'Panel20
-        '
-        Me.Panel20.Dock = System.Windows.Forms.DockStyle.Top
-        Me.Panel20.Location = New System.Drawing.Point(12, 0)
-        Me.Panel20.Name = "Panel20"
-        Me.Panel20.Size = New System.Drawing.Size(330, 10)
-        Me.Panel20.TabIndex = 6
-        '
-        'Panel21
-        '
-        Me.Panel21.Dock = System.Windows.Forms.DockStyle.Bottom
-        Me.Panel21.Location = New System.Drawing.Point(12, 37)
-        Me.Panel21.Name = "Panel21"
-        Me.Panel21.Size = New System.Drawing.Size(330, 10)
-        Me.Panel21.TabIndex = 7
-        '
        'Label5
        '
        Me.Label5.AutoSize = True
@@ -341,13 +310,49 @@ Partial Class Import
        Me.Label5.TabIndex = 8
        Me.Label5.Text = "Defaults:"
        '
-        'Panel22
+        'Panel21
        '
-        Me.Panel22.Dock = System.Windows.Forms.DockStyle.Left
-        Me.Panel22.Location = New System.Drawing.Point(0, 0)
-        Me.Panel22.Name = "Panel22"
-        Me.Panel22.Size = New System.Drawing.Size(12, 192)
-        Me.Panel22.TabIndex = 5
+        Me.Panel21.Dock = System.Windows.Forms.DockStyle.Bottom
+        Me.Panel21.Location = New System.Drawing.Point(12, 37)
+        Me.Panel21.Name = "Panel21"
+        Me.Panel21.Size = New System.Drawing.Size(330, 10)
+        Me.Panel21.TabIndex = 7
+        '
+        'Panel20
+        '
+        Me.Panel20.Dock = System.Windows.Forms.DockStyle.Top
+        Me.Panel20.Location = New System.Drawing.Point(12, 0)
+        Me.Panel20.Name = "Panel20"
+        Me.Panel20.Size = New System.Drawing.Size(330, 10)
+        Me.Panel20.TabIndex = 6
+        '
+        'Panel19
+        '
+        Me.Panel19.Dock = System.Windows.Forms.DockStyle.Left
+        Me.Panel19.Location = New System.Drawing.Point(0, 0)
+        Me.Panel19.Name = "Panel19"
+        Me.Panel19.Size = New System.Drawing.Size(12, 47)
+        Me.Panel19.TabIndex = 4
+        '
+        'Panel18
+        '
+        Me.Panel18.Controls.Add(Me.btnAccept)
+        Me.Panel18.Controls.Add(Me.Panel24)
+        Me.Panel18.Controls.Add(Me.Panel23)
+        Me.Panel18.Controls.Add(Me.Panel22)
+        Me.Panel18.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.Panel18.Location = New System.Drawing.Point(20, 350)
+        Me.Panel18.Name = "Panel18"
+        Me.Panel18.Size = New System.Drawing.Size(342, 192)
+        Me.Panel18.TabIndex = 16
+        '
+        'Panel24
+        '
+        Me.Panel24.Dock = System.Windows.Forms.DockStyle.Top
+        Me.Panel24.Location = New System.Drawing.Point(12, 40)
+        Me.Panel24.Name = "Panel24"
+        Me.Panel24.Size = New System.Drawing.Size(330, 10)
+        Me.Panel24.TabIndex = 8
        '
        'Panel23
        '
@@ -359,13 +364,17 @@ Partial Class Import
        Me.Panel23.Size = New System.Drawing.Size(330, 40)
        Me.Panel23.TabIndex = 6
        '
-        'Panel24
+        'MetroComboBox1
        '
-        Me.Panel24.Dock = System.Windows.Forms.DockStyle.Top
-        Me.Panel24.Location = New System.Drawing.Point(12, 40)
-        Me.Panel24.Name = "Panel24"
-        Me.Panel24.Size = New System.Drawing.Size(330, 10)
-        Me.Panel24.TabIndex = 8
+        Me.MetroComboBox1.FormattingEnabled = True
+        Me.MetroComboBox1.ItemHeight = 24
+        Me.MetroComboBox1.Items.AddRange(New Object() {"HTTP", "Socks4", "Socks4a", "Socks5"})
+        Me.MetroComboBox1.Location = New System.Drawing.Point(102, 4)
+        Me.MetroComboBox1.Name = "MetroComboBox1"
+        Me.MetroComboBox1.Size = New System.Drawing.Size(222, 30)
+        Me.MetroComboBox1.TabIndex = 5
+        Me.MetroComboBox1.Theme = MetroFramework.MetroThemeStyle.Dark
+        Me.MetroComboBox1.UseSelectable = True
        '
        'Label6
        '
@@ -377,17 +386,31 @@ Partial Class Import
        Me.Label6.TabIndex = 9
        Me.Label6.Text = "Type"
        '
-        'MetroComboBox1
+        'Panel22
        '
-        Me.MetroComboBox1.FormattingEnabled = True
-        Me.MetroComboBox1.ItemHeight = 24
-        Me.MetroComboBox1.Items.AddRange(New Object() {"HTTP", "Socks4", "Socks4a", "Socks5"})
-        Me.MetroComboBox1.Location = New System.Drawing.Point(102, 5)
-        Me.MetroComboBox1.Name = "MetroComboBox1"
-        Me.MetroComboBox1.Size = New System.Drawing.Size(222, 30)
-        Me.MetroComboBox1.TabIndex = 9
-        Me.MetroComboBox1.Theme = MetroFramework.MetroThemeStyle.Dark
-        Me.MetroComboBox1.UseSelectable = True
+        Me.Panel22.Dock = System.Windows.Forms.DockStyle.Left
+        Me.Panel22.Location = New System.Drawing.Point(0, 0)
+        Me.Panel22.Name = "Panel22"
+        Me.Panel22.Size = New System.Drawing.Size(12, 192)
+        Me.Panel22.TabIndex = 5
+        '
+        'OpenFileDialog1
+        '
+        Me.OpenFileDialog1.FileName = "OpenFileDialog1"
+        Me.OpenFileDialog1.InitialDirectory = "C:\"
+        '
+        'btnAccept
+        '
+        Me.btnAccept.BackColor = System.Drawing.Color.FromArgb(CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer))
+        Me.btnAccept.FlatStyle = System.Windows.Forms.FlatStyle.Popup
+        Me.btnAccept.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.2!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.btnAccept.ForeColor = System.Drawing.Color.Gainsboro
+        Me.btnAccept.Location = New System.Drawing.Point(21, 160)
+        Me.btnAccept.Name = "btnAccept"
+        Me.btnAccept.Size = New System.Drawing.Size(315, 29)
+        Me.btnAccept.TabIndex = 9
+        Me.btnAccept.Text = "Accept"
+        Me.btnAccept.UseVisualStyleBackColor = False
        '
        'Import
        '
@@ -460,4 +483,6 @@ Partial Class Import
    Friend WithEvents MetroComboBox1 As MetroFramework.Controls.MetroComboBox
    Friend WithEvents Label6 As Label
    Friend WithEvents Panel22 As Panel
+    Friend WithEvents OpenFileDialog1 As OpenFileDialog
+    Friend WithEvents btnAccept As Button
 End Class
@@ -117,4 +117,7 @@
  <resheader name="writer">
    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
  </resheader>
+  <metadata name="OpenFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
 </root>
@@ -1,3 +1,23 @@
-Public Class Import
+Imports System.IO
+Public Class Import
+    Private Sub btnBrowse_Click(sender As Object, e As EventArgs) Handles btnBrowse.Click
+        OpenFileDialog1.ShowDialog()
+    End Sub

+
+    Sub proxyAdderListBox() Handles OpenFileDialog1.FileOk
+        Dim fileName As String = Path.GetFileNameWithoutExtension(OpenFileDialog1.FileName)
+        ListBox1.Items.Add(fileName)
+        ListBox1.ForeColor = Color.Gainsboro
+    End Sub
+
+
+    Sub AddRowsFromFile(filepath As String)
+        Dim lines As String() = File.ReadAllLines(filepath)
+
+        For Each line As String In lines
+            Main.DataGridView1.Rows.Add(line)
+        Next
+
+    End Sub
 End Class
@@ -1,9 +1,9 @@
-<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
 Partial Class Main
    Inherits System.Windows.Forms.Form

    'Form overrides dispose to clean up the component list.
-    <System.Diagnostics.DebuggerNonUserCode()> _
+    <System.Diagnostics.DebuggerNonUserCode()>
    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
        Try
            If disposing AndAlso components IsNot Nothing Then
@@ -20,8 +20,15 @@ Partial Class Main
    'NOTE: The following procedure is required by the Windows Form Designer
    'It can be modified using the Windows Form Designer.  
    'Do not modify it using the code editor.
-    <System.Diagnostics.DebuggerStepThrough()> _
+    <System.Diagnostics.DebuggerStepThrough()>
    Private Sub InitializeComponent()
+        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Me.Panel1 = New System.Windows.Forms.Panel()
        Me.btnMinimize = New MetroFramework.Controls.MetroButton()
        Me.btnMaximize = New MetroFramework.Controls.MetroButton()
@@ -76,6 +83,12 @@ Partial Class Main
        Me.Label4 = New System.Windows.Forms.Label()
        Me.Panel20 = New System.Windows.Forms.Panel()
        Me.DataGridView1 = New System.Windows.Forms.DataGridView()
+        Me.type = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.proxy = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.port = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.working = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.ping = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.lastchecked = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.Panel1.SuspendLayout()
        Me.Panel4.SuspendLayout()
        Me.Panel11.SuspendLayout()
@@ -649,16 +662,97 @@ Partial Class Main
        '
        'DataGridView1
        '
+        Me.DataGridView1.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
        Me.DataGridView1.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer))
+        Me.DataGridView1.BorderStyle = System.Windows.Forms.BorderStyle.None
+        Me.DataGridView1.ColumnHeadersBorderStyle = System.Windows.Forms.DataGridViewHeaderBorderStyle.None
+        DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleCenter
+        DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer))
+        DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.8!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle1.ForeColor = System.Drawing.Color.Gainsboro
+        DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.DataGridView1.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle1
        Me.DataGridView1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.DataGridView1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.type, Me.proxy, Me.port, Me.working, Me.ping, Me.lastchecked})
+        DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle5.BackColor = System.Drawing.Color.FromArgb(CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer))
+        DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.8!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle5.ForeColor = System.Drawing.Color.Gainsboro
+        DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.DataGridView1.DefaultCellStyle = DataGridViewCellStyle5
        Me.DataGridView1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.DataGridView1.EnableHeadersVisualStyles = False
+        Me.DataGridView1.GridColor = System.Drawing.Color.FromArgb(CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer))
        Me.DataGridView1.Location = New System.Drawing.Point(25, 152)
        Me.DataGridView1.Name = "DataGridView1"
+        Me.DataGridView1.RowHeadersBorderStyle = System.Windows.Forms.DataGridViewHeaderBorderStyle.None
+        DataGridViewCellStyle6.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle6.BackColor = System.Drawing.Color.FromArgb(CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer))
+        DataGridViewCellStyle6.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.8!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle6.ForeColor = System.Drawing.Color.Gainsboro
+        DataGridViewCellStyle6.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.DataGridView1.RowHeadersDefaultCellStyle = DataGridViewCellStyle6
+        Me.DataGridView1.RowHeadersVisible = False
        Me.DataGridView1.RowHeadersWidth = 51
+        DataGridViewCellStyle7.BackColor = System.Drawing.Color.FromArgb(CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer))
+        DataGridViewCellStyle7.ForeColor = System.Drawing.Color.Gainsboro
+        Me.DataGridView1.RowsDefaultCellStyle = DataGridViewCellStyle7
        Me.DataGridView1.RowTemplate.Height = 24
+        Me.DataGridView1.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
        Me.DataGridView1.Size = New System.Drawing.Size(538, 542)
        Me.DataGridView1.TabIndex = 13
        '
+        'type
+        '
+        DataGridViewCellStyle2.BackColor = System.Drawing.Color.FromArgb(CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer))
+        DataGridViewCellStyle2.ForeColor = System.Drawing.Color.Gainsboro
+        Me.type.DefaultCellStyle = DataGridViewCellStyle2
+        Me.type.HeaderText = "Type"
+        Me.type.MinimumWidth = 6
+        Me.type.Name = "type"
+        '
+        'proxy
+        '
+        DataGridViewCellStyle3.BackColor = System.Drawing.Color.FromArgb(CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer))
+        DataGridViewCellStyle3.ForeColor = System.Drawing.Color.Gainsboro
+        Me.proxy.DefaultCellStyle = DataGridViewCellStyle3
+        Me.proxy.HeaderText = "Proxy"
+        Me.proxy.MinimumWidth = 6
+        Me.proxy.Name = "proxy"
+        '
+        'port
+        '
+        DataGridViewCellStyle4.BackColor = System.Drawing.Color.FromArgb(CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer), CType(CType(17, Byte), Integer))
+        DataGridViewCellStyle4.ForeColor = System.Drawing.Color.Gainsboro
+        Me.port.DefaultCellStyle = DataGridViewCellStyle4
+        Me.port.HeaderText = "Port"
+        Me.port.MinimumWidth = 6
+        Me.port.Name = "port"
+        '
+        'working
+        '
+        Me.working.HeaderText = "Working"
+        Me.working.MinimumWidth = 6
+        Me.working.Name = "working"
+        '
+        'ping
+        '
+        Me.ping.HeaderText = "Ping"
+        Me.ping.MinimumWidth = 6
+        Me.ping.Name = "ping"
+        '
+        'lastchecked
+        '
+        Me.lastchecked.HeaderText = "Last Checked"
+        Me.lastchecked.MinimumWidth = 6
+        Me.lastchecked.Name = "lastchecked"
+        '
        'Main
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!)
@@ -748,4 +842,10 @@ Partial Class Main
    Friend WithEvents btnMaximize As MetroFramework.Controls.MetroButton
    Friend WithEvents Panel20 As Panel
    Friend WithEvents DataGridView1 As DataGridView
+    Friend WithEvents type As DataGridViewTextBoxColumn
+    Friend WithEvents proxy As DataGridViewTextBoxColumn
+    Friend WithEvents port As DataGridViewTextBoxColumn
+    Friend WithEvents working As DataGridViewTextBoxColumn
+    Friend WithEvents ping As DataGridViewTextBoxColumn
+    Friend WithEvents lastchecked As DataGridViewTextBoxColumn
 End Class
@@ -117,4 +117,22 @@
  <resheader name="writer">
    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
  </resheader>
+  <metadata name="type.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="proxy.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="port.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="working.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="ping.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="lastchecked.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
 </root>
@@ -18,5 +18,4 @@
        Application.Exit()
    End Sub

-
 End Class
@@ -13,15 +13,15 @@ Option Explicit On


 Namespace My
-
+    
    'NOTE: This file is auto-generated; do not modify it directly.  To make changes,
    ' or if you encounter build errors in this file, go to the Project Designer
    ' (go to Project Properties or double-click the My Project node in
    ' Solution Explorer), and make changes on the Application tab.
    '
    Partial Friend Class MyApplication
-
-        <Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
        Public Sub New()
            MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
            Me.IsSingleInstance = false
@@ -29,10 +29,10 @@ Namespace My
            Me.SaveMySettingsOnExit = true
            Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
        End Sub
-
-        <Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
        Protected Overrides Sub OnCreateMainForm()
-            Me.MainForm = Global.Checker.Main
+            Me.MainForm = Global.Checker.Import
        End Sub
    End Class
 End Namespace
@@ -1,11 +1,10 @@
 <?xml version="1.0" encoding="utf-8"?>
 <MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
  <MySubMain>true</MySubMain>
-  <MainForm>Form1</MainForm>
+  <MainForm>Import</MainForm>
  <SingleInstance>false</SingleInstance>
  <ShutdownMode>0</ShutdownMode>
  <EnableVisualStyles>true</EnableVisualStyles>
  <AuthenticationMode>0</AuthenticationMode>
-  <ApplicationType>0</ApplicationType>
  <SaveMySettingsOnExit>true</SaveMySettingsOnExit>
-</MyApplicationData>
+</MyApplicationData>
@@ -0,0 +1,79 @@
+<?xml version="1.0" encoding="utf-8"?>
+<assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1">
+  <assemblyIdentity version="1.0.0.0" name="MyApplication.app"/>
+  <trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
+    <security>
+      <requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
+        <!-- UAC Manifest Options
+             If you want to change the Windows User Account Control level replace the 
+             requestedExecutionLevel node with one of the following.
+
+        <requestedExecutionLevel  level="asInvoker" uiAccess="false" />
+        <requestedExecutionLevel  level="requireAdministrator" uiAccess="false" />
+        <requestedExecutionLevel  level="highestAvailable" uiAccess="false" />
+
+            Specifying requestedExecutionLevel element will disable file and registry virtualization. 
+            Remove this element if your application requires this virtualization for backwards
+            compatibility.
+        -->
+        <requestedExecutionLevel level="asInvoker" uiAccess="false" />
+      </requestedPrivileges>
+    </security>
+  </trustInfo>
+
+  <compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
+    <application>
+      <!-- A list of the Windows versions that this application has been tested on
+           and is designed to work with. Uncomment the appropriate elements
+           and Windows will automatically select the most compatible environment. -->
+
+      <!-- Windows Vista -->
+      <!--<supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}" />-->
+
+       Windows 7 
+      <supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}" />
+
+       Windows 8 
+      <supportedOS Id="{4a2f28e3-53b9-4441-ba9c-d69d4a4a6e38}" />
+
+       Windows 8.1 
+      <supportedOS Id="{1f676c76-80e1-4239-95bb-83d0f6d0da78}" />
+
+       Windows 10 
+      <supportedOS Id="{8e0f7a12-bfb3-4fe8-b9a5-48fd50a15a9a}" />
+
+    </application>
+  </compatibility>
+
+  <!-- Indicates that the application is DPI-aware and will not be automatically scaled by Windows at higher
+       DPIs. Windows Presentation Foundation (WPF) applications are automatically DPI-aware and do not need 
+       to opt in. Windows Forms applications targeting .NET Framework 4.6 that opt into this setting, should 
+       also set the 'EnableWindowsFormsHighDpiAutoResizing' setting to 'true' in their app.config. 
+       
+       Makes the application long-path aware. See https://docs.microsoft.com/windows/win32/fileio/maximum-file-path-limitation -->
+  
+  <application xmlns="urn:schemas-microsoft-com:asm.v3">
+    <windowsSettings>
+      <dpiAware xmlns="http://schemas.microsoft.com/SMI/2005/WindowsSettings">true</dpiAware>
+      <longPathAware xmlns="http://schemas.microsoft.com/SMI/2016/WindowsSettings">true</longPathAware>
+    </windowsSettings>
+  </application>
+  
+
+  <!-- Enable themes for Windows common controls and dialogs (Windows XP and later) -->
+  <!--
+  <dependency>
+    <dependentAssembly>
+      <assemblyIdentity
+          type="win32"
+          name="Microsoft.Windows.Common-Controls"
+          version="6.0.0.0"
+          processorArchitecture="*"
+          publicKeyToken="6595b64144ccf1df"
+          language="*"
+        />
+    </dependentAssembly>
+  </dependency>
+  -->
+
+</assembly>