_ Partial Class OnlineCheck Inherits DevComponents.DotNetBar.Office2007Form 'Form overrides dispose to clean up the component list. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Required by the Windows Form Designer Private components As System.ComponentModel.IContainer '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. _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(OnlineCheck)) Me.ButtonX1 = New DevComponents.DotNetBar.ButtonX() Me.TextBox1 = New System.Windows.Forms.TextBox() Me.Label1 = New System.Windows.Forms.Label() Me.lblHotel = New System.Windows.Forms.Label() Me.cmbHotel = New System.Windows.Forms.ComboBox() Me.WebBrowser1 = New System.Windows.Forms.WebBrowser() Me.StyleManager1 = New DevComponents.DotNetBar.StyleManager(Me.components) Me.Label2 = New System.Windows.Forms.Label() Me.SuspendLayout() ' 'ButtonX1 ' Me.ButtonX1.AccessibleRole = System.Windows.Forms.AccessibleRole.PushButton Me.ButtonX1.ColorTable = DevComponents.DotNetBar.eButtonColor.OrangeWithBackground Me.ButtonX1.Location = New System.Drawing.Point(14, 91) Me.ButtonX1.Name = "ButtonX1" Me.ButtonX1.Size = New System.Drawing.Size(149, 23) Me.ButtonX1.Style = DevComponents.DotNetBar.eDotNetBarStyle.StyleManagerControlled Me.ButtonX1.TabIndex = 0 Me.ButtonX1.Text = "Check " ' 'TextBox1 ' Me.TextBox1.Location = New System.Drawing.Point(12, 25) Me.TextBox1.Name = "TextBox1" Me.TextBox1.Size = New System.Drawing.Size(151, 20) Me.TextBox1.TabIndex = 1 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label1.ForeColor = System.Drawing.Color.Yellow Me.Label1.Location = New System.Drawing.Point(9, 9) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(80, 13) Me.Label1.TabIndex = 2 Me.Label1.Text = "Habbo Name" ' 'lblHotel ' Me.lblHotel.AutoSize = True Me.lblHotel.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblHotel.ForeColor = System.Drawing.Color.Yellow Me.lblHotel.Location = New System.Drawing.Point(9, 48) Me.lblHotel.Name = "lblHotel" Me.lblHotel.Size = New System.Drawing.Size(37, 13) Me.lblHotel.TabIndex = 28 Me.lblHotel.Text = "Hotel" ' 'cmbHotel ' Me.cmbHotel.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.cmbHotel.ForeColor = System.Drawing.Color.Black Me.cmbHotel.FormattingEnabled = True Me.cmbHotel.Items.AddRange(New Object() {".com", ".com.br", ".de", ".dk", ".es", ".fi", ".fr", ".it", ".nl", ".no", ".se"}) Me.cmbHotel.Location = New System.Drawing.Point(12, 64) Me.cmbHotel.Name = "cmbHotel" Me.cmbHotel.Size = New System.Drawing.Size(151, 21) Me.cmbHotel.Sorted = True Me.cmbHotel.TabIndex = 27 ' 'WebBrowser1 ' Me.WebBrowser1.IsWebBrowserContextMenuEnabled = False Me.WebBrowser1.Location = New System.Drawing.Point(14, 120) Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20) Me.WebBrowser1.Name = "WebBrowser1" Me.WebBrowser1.ScriptErrorsSuppressed = True Me.WebBrowser1.ScrollBarsEnabled = False Me.WebBrowser1.Size = New System.Drawing.Size(149, 53) Me.WebBrowser1.TabIndex = 29 Me.WebBrowser1.WebBrowserShortcutsEnabled = False ' 'StyleManager1 ' Me.StyleManager1.ManagerColorTint = System.Drawing.Color.Black Me.StyleManager1.ManagerStyle = DevComponents.DotNetBar.eStyle.Office2007Black ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label2.ForeColor = System.Drawing.Color.Yellow Me.Label2.Location = New System.Drawing.Point(23, 135) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(88, 16) Me.Label2.TabIndex = 30 Me.Label2.Text = "Checking...." Me.Label2.Visible = False ' 'OnlineCheck ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(178, 188) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.WebBrowser1) Me.Controls.Add(Me.lblHotel) Me.Controls.Add(Me.cmbHotel) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.TextBox1) Me.Controls.Add(Me.ButtonX1) Me.EnableGlass = False Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.MaximizeBox = False Me.MinimizeBox = False Me.Name = "OnlineCheck" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "OnlineCheck" Me.TopMost = True Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents ButtonX1 As DevComponents.DotNetBar.ButtonX Friend WithEvents TextBox1 As System.Windows.Forms.TextBox Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents lblHotel As System.Windows.Forms.Label Friend WithEvents cmbHotel As System.Windows.Forms.ComboBox Friend WithEvents WebBrowser1 As System.Windows.Forms.WebBrowser Friend WithEvents StyleManager1 As DevComponents.DotNetBar.StyleManager Friend WithEvents Label2 As System.Windows.Forms.Label End Class