frmwel.designer.vb

来自「Online Telephone Directory in Visual Bas」· VB 代码 · 共 460 行 · 第 1/2 页

VB
460 行
字号
12
		Me._Shape1_7.Text = "_Shape1_7"
		Me._Shape1_7.Name = "_Shape1_7"
		Me._Shape1_8.BackColor = System.Drawing.Color.Red
		Me._Shape1_8.Size = New System.Drawing.Size(25, 17)
		Me._Shape1_8.Location = New System.Drawing.Point(16, 408)
		Me._Shape1_8.Visible = True
		Me._Shape1_8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
		Me._Shape1_8.ForeColor = System.Drawing.Color.Black
		Me._Shape1_8.Text = "_Shape1_8"
		Me._Shape1_8.Name = "_Shape1_8"
		Me._Label2_4.Text = "View all STD Codes "
		Me._Label2_4.Font = New System.Drawing.Font("Times New Roman", 12!, System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
		Me._Label2_4.ForeColor = System.Drawing.Color.White
		Me._Label2_4.Size = New System.Drawing.Size(138, 19)
		Me._Label2_4.Location = New System.Drawing.Point(48, 256)
		Me._Label2_4.TabIndex = 7
		Me._Label2_4.TextAlign = System.Drawing.ContentAlignment.TopLeft
		Me._Label2_4.BackColor = System.Drawing.Color.Transparent
		Me._Label2_4.Enabled = True
		Me._Label2_4.RightToLeft = System.Windows.Forms.RightToLeft.No
		Me._Label2_4.UseMnemonic = True
		Me._Label2_4.Visible = True
		Me._Label2_4.AutoSize = True
		Me._Label2_4.BorderStyle = System.Windows.Forms.BorderStyle.None
		Me._Label2_4.Name = "_Label2_4"
		Me._Label2_5.Text = "View all I S D Codes"
		Me._Label2_5.Font = New System.Drawing.Font("Times New Roman", 12!, System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
		Me._Label2_5.ForeColor = System.Drawing.Color.White
		Me._Label2_5.Size = New System.Drawing.Size(138, 19)
		Me._Label2_5.Location = New System.Drawing.Point(48, 294)
		Me._Label2_5.TabIndex = 6
		Me._Label2_5.TextAlign = System.Drawing.ContentAlignment.TopLeft
		Me._Label2_5.BackColor = System.Drawing.Color.Transparent
		Me._Label2_5.Enabled = True
		Me._Label2_5.RightToLeft = System.Windows.Forms.RightToLeft.No
		Me._Label2_5.UseMnemonic = True
		Me._Label2_5.Visible = True
		Me._Label2_5.AutoSize = True
		Me._Label2_5.BorderStyle = System.Windows.Forms.BorderStyle.None
		Me._Label2_5.Name = "_Label2_5"
		Me._Shape1_4.BackColor = System.Drawing.Color.Red
		Me._Shape1_4.Size = New System.Drawing.Size(25, 17)
		Me._Shape1_4.Location = New System.Drawing.Point(16, 256)
		Me._Shape1_4.Visible = True
		Me._Shape1_4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
		Me._Shape1_4.ForeColor = System.Drawing.Color.Black
		Me._Shape1_4.Text = "_Shape1_4"
		Me._Shape1_4.Name = "_Shape1_4"
		Me._Shape1_5.BackColor = System.Drawing.Color.Red
		Me._Shape1_5.Size = New System.Drawing.Size(25, 17)
		Me._Shape1_5.Location = New System.Drawing.Point(16, 296)
		Me._Shape1_5.Visible = True
		Me._Shape1_5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
		Me._Shape1_5.ForeColor = System.Drawing.Color.Black
		Me._Shape1_5.Text = "_Shape1_5"
		Me._Shape1_5.Name = "_Shape1_5"
		Me._Label2_2.Text = "Address Search"
		Me._Label2_2.Font = New System.Drawing.Font("Times New Roman", 12!, System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
		Me._Label2_2.ForeColor = System.Drawing.Color.White
		Me._Label2_2.Size = New System.Drawing.Size(105, 19)
		Me._Label2_2.Location = New System.Drawing.Point(48, 180)
		Me._Label2_2.TabIndex = 5
		Me._Label2_2.TextAlign = System.Drawing.ContentAlignment.TopLeft
		Me._Label2_2.BackColor = System.Drawing.Color.Transparent
		Me._Label2_2.Enabled = True
		Me._Label2_2.RightToLeft = System.Windows.Forms.RightToLeft.No
		Me._Label2_2.UseMnemonic = True
		Me._Label2_2.Visible = True
		Me._Label2_2.AutoSize = True
		Me._Label2_2.BorderStyle = System.Windows.Forms.BorderStyle.None
		Me._Label2_2.Name = "_Label2_2"
		Me._Label2_3.Text = "Yellow Pages"
		Me._Label2_3.Font = New System.Drawing.Font("Times New Roman", 12!, System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
		Me._Label2_3.ForeColor = System.Drawing.Color.White
		Me._Label2_3.Size = New System.Drawing.Size(88, 19)
		Me._Label2_3.Location = New System.Drawing.Point(48, 218)
		Me._Label2_3.TabIndex = 4
		Me._Label2_3.TextAlign = System.Drawing.ContentAlignment.TopLeft
		Me._Label2_3.BackColor = System.Drawing.Color.Transparent
		Me._Label2_3.Enabled = True
		Me._Label2_3.RightToLeft = System.Windows.Forms.RightToLeft.No
		Me._Label2_3.UseMnemonic = True
		Me._Label2_3.Visible = True
		Me._Label2_3.AutoSize = True
		Me._Label2_3.BorderStyle = System.Windows.Forms.BorderStyle.None
		Me._Label2_3.Name = "_Label2_3"
		Me._Shape1_2.BackColor = System.Drawing.Color.Red
		Me._Shape1_2.Size = New System.Drawing.Size(25, 17)
		Me._Shape1_2.Location = New System.Drawing.Point(16, 184)
		Me._Shape1_2.Visible = True
		Me._Shape1_2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
		Me._Shape1_2.ForeColor = System.Drawing.Color.Black
		Me._Shape1_2.Text = "_Shape1_2"
		Me._Shape1_2.Name = "_Shape1_2"
		Me._Shape1_3.BackColor = System.Drawing.Color.Red
		Me._Shape1_3.Size = New System.Drawing.Size(25, 17)
		Me._Shape1_3.Location = New System.Drawing.Point(16, 216)
		Me._Shape1_3.Visible = True
		Me._Shape1_3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
		Me._Shape1_3.ForeColor = System.Drawing.Color.Black
		Me._Shape1_3.Text = "_Shape1_3"
		Me._Shape1_3.Name = "_Shape1_3"
		Me._Shape1_1.BackColor = System.Drawing.Color.Red
		Me._Shape1_1.Size = New System.Drawing.Size(25, 17)
		Me._Shape1_1.Location = New System.Drawing.Point(16, 144)
		Me._Shape1_1.Visible = True
		Me._Shape1_1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
		Me._Shape1_1.ForeColor = System.Drawing.Color.Black
		Me._Shape1_1.Text = "_Shape1_1"
		Me._Shape1_1.Name = "_Shape1_1"
		Me._Shape1_0.BackColor = System.Drawing.Color.Red
		Me._Shape1_0.Size = New System.Drawing.Size(25, 17)
		Me._Shape1_0.Location = New System.Drawing.Point(16, 104)
		Me._Shape1_0.Visible = True
		Me._Shape1_0.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
		Me._Shape1_0.ForeColor = System.Drawing.Color.Black
		Me._Shape1_0.Text = "_Shape1_0"
		Me._Shape1_0.Name = "_Shape1_0"
		Me._Label2_1.Text = "I S D Code Search"
		Me._Label2_1.Font = New System.Drawing.Font("Times New Roman", 12!, System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
		Me._Label2_1.ForeColor = System.Drawing.Color.White
		Me._Label2_1.Size = New System.Drawing.Size(124, 19)
		Me._Label2_1.Location = New System.Drawing.Point(48, 142)
		Me._Label2_1.TabIndex = 3
		Me._Label2_1.TextAlign = System.Drawing.ContentAlignment.TopLeft
		Me._Label2_1.BackColor = System.Drawing.Color.Transparent
		Me._Label2_1.Enabled = True
		Me._Label2_1.RightToLeft = System.Windows.Forms.RightToLeft.No
		Me._Label2_1.UseMnemonic = True
		Me._Label2_1.Visible = True
		Me._Label2_1.AutoSize = True
		Me._Label2_1.BorderStyle = System.Windows.Forms.BorderStyle.None
		Me._Label2_1.Name = "_Label2_1"
		Me._Label2_0.Text = "S T D Code Search"
		Me._Label2_0.Font = New System.Drawing.Font("Times New Roman", 12!, System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
		Me._Label2_0.ForeColor = System.Drawing.Color.White
		Me._Label2_0.Size = New System.Drawing.Size(128, 19)
		Me._Label2_0.Location = New System.Drawing.Point(48, 104)
		Me._Label2_0.TabIndex = 2
		Me._Label2_0.TextAlign = System.Drawing.ContentAlignment.TopLeft
		Me._Label2_0.BackColor = System.Drawing.Color.Transparent
		Me._Label2_0.Enabled = True
		Me._Label2_0.RightToLeft = System.Windows.Forms.RightToLeft.No
		Me._Label2_0.UseMnemonic = True
		Me._Label2_0.Visible = True
		Me._Label2_0.AutoSize = True
		Me._Label2_0.BorderStyle = System.Windows.Forms.BorderStyle.None
		Me._Label2_0.Name = "_Label2_0"
		Me.Line1.BackColor = System.Drawing.Color.Red
		Me.Line1.Visible = True
		Me.Line1.Location = New System.Drawing.Point(56, 64)
		Me.Line1.Size = New System.Drawing.Size(576, 1)
		Me.Line1.Name = "Line1"
		Me.Label1.Text = "Online Telephone Directory"
		Me.Label1.Font = New System.Drawing.Font("Garamond", 36!, System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
		Me.Label1.ForeColor = System.Drawing.Color.Yellow
		Me.Label1.Size = New System.Drawing.Size(580, 54)
		Me.Label1.Location = New System.Drawing.Point(56, 8)
		Me.Label1.TabIndex = 1
		Me.Label1.TextAlign = System.Drawing.ContentAlignment.TopLeft
		Me.Label1.BackColor = System.Drawing.Color.Transparent
		Me.Label1.Enabled = True
		Me.Label1.Cursor = System.Windows.Forms.Cursors.Default
		Me.Label1.RightToLeft = System.Windows.Forms.RightToLeft.No
		Me.Label1.UseMnemonic = True
		Me.Label1.Visible = True
		Me.Label1.AutoSize = True
		Me.Label1.BorderStyle = System.Windows.Forms.BorderStyle.None
		Me.Label1.Name = "Label1"
		Me.Shape9.Size = New System.Drawing.Size(185, 65)
		Me.Shape9.Location = New System.Drawing.Point(432, 336)
		Me.Shape9.BackColor = System.Drawing.Color.Red
		Me.Shape9.Visible = True
		Me.Shape9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
		Me.Shape9.ForeColor = System.Drawing.Color.Black
		Me.Shape9.Text = "Shape9"
		Me.Shape9.Name = "Shape9"
		Me.Controls.Add(Frame1)
		Me.Controls.Add(WebBrowser1)
		Me.Controls.Add(_Shape1_6)
		Me.Controls.Add(_Label2_8)
		Me.Controls.Add(Label10)
		Me.Controls.Add(_Label2_6)
		Me.Controls.Add(_Label2_7)
		Me.Controls.Add(_Shape1_7)
		Me.Controls.Add(_Shape1_8)
		Me.Controls.Add(_Label2_4)
		Me.Controls.Add(_Label2_5)
		Me.Controls.Add(_Shape1_4)
		Me.Controls.Add(_Shape1_5)
		Me.Controls.Add(_Label2_2)
		Me.Controls.Add(_Label2_3)
		Me.Controls.Add(_Shape1_2)
		Me.Controls.Add(_Shape1_3)
		Me.Controls.Add(_Shape1_1)
		Me.Controls.Add(_Shape1_0)
		Me.Controls.Add(_Label2_1)
		Me.Controls.Add(_Label2_0)
		Me.Controls.Add(Line1)
		Me.Controls.Add(Label1)
		Me.Controls.Add(Shape9)
		Me.Frame1.Controls.Add(Image3)
		Me.Frame1.Controls.Add(Image2)
		Me.Frame1.Controls.Add(Image1)
		Me.Label2.SetIndex(_Label2_8, CType(8, Short))
		Me.Label2.SetIndex(_Label2_6, CType(6, Short))
		Me.Label2.SetIndex(_Label2_7, CType(7, Short))
		Me.Label2.SetIndex(_Label2_4, CType(4, Short))
		Me.Label2.SetIndex(_Label2_5, CType(5, Short))
		Me.Label2.SetIndex(_Label2_2, CType(2, Short))
		Me.Label2.SetIndex(_Label2_3, CType(3, Short))
		Me.Label2.SetIndex(_Label2_1, CType(1, Short))
		Me.Label2.SetIndex(_Label2_0, CType(0, Short))
		Me.Shape1.SetIndex(_Shape1_6, CType(6, Short))
		Me.Shape1.SetIndex(_Shape1_7, CType(7, Short))
		Me.Shape1.SetIndex(_Shape1_8, CType(8, Short))
		Me.Shape1.SetIndex(_Shape1_4, CType(4, Short))
		Me.Shape1.SetIndex(_Shape1_5, CType(5, Short))
		Me.Shape1.SetIndex(_Shape1_2, CType(2, Short))
		Me.Shape1.SetIndex(_Shape1_3, CType(3, Short))
		Me.Shape1.SetIndex(_Shape1_1, CType(1, Short))
		Me.Shape1.SetIndex(_Shape1_0, CType(0, Short))
		CType(Me.Shape1, System.ComponentModel.ISupportInitialize).EndInit()
		CType(Me.Label2, System.ComponentModel.ISupportInitialize).EndInit()
		Me.Frame1.ResumeLayout(False)
		Me.ResumeLayout(False)
		Me.PerformLayout()
	End Sub
#End Region 
End Class
12

frmwel.designer.vb - 源码说明

本页面展示了「Online Telephone Directory in Visual Basic」中的 frmwel.designer.vb 源码文件，采用 VB 编程语言编写，共 460 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与Visual Basic相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?