⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frmbrokenchild.designer.vb

📁 清华大学出版社出版的 移动应用开发宝典 张大威(2008)的附书源代码
💻 VB
字号:
Imports Microsoft.VisualBasic
Imports System
Namespace CodeForChapter2
	Public Partial Class frmBrokenChild
		''' <summary>
		''' Required designer variable.
		''' </summary>
		Private components As System.ComponentModel.IContainer = Nothing

		''' <summary>
		''' Clean up any resources being used.
		''' </summary>
		''' <param name="disposing">true if managed resources should be disposed; otherwise, false.</param>
		Protected Overrides Sub Dispose(ByVal disposing As Boolean)
			If disposing AndAlso (Not components Is Nothing) Then
				components.Dispose()
			End If
			MyBase.Dispose(disposing)
		End Sub

		#Region "Windows Form Designer generated code"

		''' <summary>
		''' Required method for Designer support - do not modify
		''' the contents of this method with the code editor.
		''' </summary>
		Private Sub InitializeComponent()
		  Me.tabControl1 = New System.Windows.Forms.TabControl()
		  Me.tabPage1 = New System.Windows.Forms.TabPage()
		  Me.label2 = New System.Windows.Forms.Label()
		  Me.tabPage2 = New System.Windows.Forms.TabPage()
		  Me.label4 = New System.Windows.Forms.Label()
		  Me.tabPage3 = New System.Windows.Forms.TabPage()
		  Me.label3 = New System.Windows.Forms.Label()
		  Me.checkBox1 = New System.Windows.Forms.CheckBox()
		  Me.tabControl1.SuspendLayout()
		  Me.tabPage1.SuspendLayout()
		  Me.tabPage2.SuspendLayout()
		  Me.tabPage3.SuspendLayout()
		  Me.SuspendLayout()
		  ' 
		  ' tabControl1
		  ' 
		  Me.tabControl1.Controls.Add(Me.tabPage1)
		  Me.tabControl1.Controls.Add(Me.tabPage2)
		  Me.tabControl1.Controls.Add(Me.tabPage3)
		  Me.tabControl1.Dock = System.Windows.Forms.DockStyle.Bottom
		  Me.tabControl1.Location = New System.Drawing.Point(0, 265)
		  Me.tabControl1.Name = "tabControl1"
		  Me.tabControl1.SelectedIndex = 0
		  Me.tabControl1.Size = New System.Drawing.Size(237, 163)
		  Me.tabControl1.TabIndex = 2
'		  Me.tabControl1.SelectedIndexChanged += New System.EventHandler(Me.tabControl1_SelectedIndexChanged);
		  ' 
		  ' tabPage1
		  ' 
		  Me.tabPage1.Controls.Add(Me.label2)
		  Me.tabPage1.Location = New System.Drawing.Point(0, 0)
		  Me.tabPage1.Name = "tabPage1"
		  Me.tabPage1.Size = New System.Drawing.Size(237, 140)
		  Me.tabPage1.Text = "tabPage1"
		  ' 
		  ' label2
		  ' 
		  Me.label2.Location = New System.Drawing.Point(14, 25)
		  Me.label2.Name = "label2"
		  Me.label2.Size = New System.Drawing.Size(171, 54)
		  Me.label2.Text = "Tab One. Go to Tab 3"
		  ' 
		  ' tabPage2
		  ' 
		  Me.tabPage2.Controls.Add(Me.label4)
		  Me.tabPage2.Location = New System.Drawing.Point(0, 0)
		  Me.tabPage2.Name = "tabPage2"
		  Me.tabPage2.Size = New System.Drawing.Size(229, 137)
		  Me.tabPage2.Text = "tabPage2"
		  ' 
		  ' label4
		  ' 
		  Me.label4.Location = New System.Drawing.Point(23, 18)
		  Me.label4.Name = "label4"
		  Me.label4.Size = New System.Drawing.Size(171, 54)
		  Me.label4.Text = "Check the box to prevent a tab change."
		  ' 
		  ' tabPage3
		  ' 
		  Me.tabPage3.Controls.Add(Me.label3)
		  Me.tabPage3.Location = New System.Drawing.Point(0, 0)
		  Me.tabPage3.Name = "tabPage3"
		  Me.tabPage3.Size = New System.Drawing.Size(229, 137)
		  Me.tabPage3.Text = "tabPage3"
		  ' 
		  ' label3
		  ' 
		  Me.label3.Location = New System.Drawing.Point(26, 23)
		  Me.label3.Name = "label3"
		  Me.label3.Size = New System.Drawing.Size(171, 54)
		  Me.label3.Text = "Tab Three. Go to Tab 2"
		  ' 
		  ' checkBox1
		  ' 
		  Me.checkBox1.Location = New System.Drawing.Point(3, 79)
		  Me.checkBox1.Name = "checkBox1"
		  Me.checkBox1.Size = New System.Drawing.Size(234, 20)
		  Me.checkBox1.TabIndex = 2
		  Me.checkBox1.Text = "Prevent tab change"
		  ' 
		  ' frmBrokenChild
		  ' 
		  Me.AutoScaleDimensions = New System.Drawing.SizeF(96F, 96F)
		  Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Dpi
		  Me.ClientSize = New System.Drawing.Size(240, 268)
		  Me.Controls.Add(Me.checkBox1)
		  Me.Controls.Add(Me.tabControl1)
		  Me.Name = "frmBrokenChild"
		  Me.Text = "We can still add controls though"
		  Me.Controls.SetChildIndex(Me.tabControl1, 0)
		  Me.Controls.SetChildIndex(Me.checkBox1, 0)
		  Me.tabControl1.ResumeLayout(False)
		  Me.tabPage1.ResumeLayout(False)
		  Me.tabPage2.ResumeLayout(False)
		  Me.tabPage3.ResumeLayout(False)
		  Me.ResumeLayout(False)

		End Sub

		#End Region

		Private WithEvents tabControl1 As System.Windows.Forms.TabControl
		Private tabPage1 As System.Windows.Forms.TabPage
		Private tabPage2 As System.Windows.Forms.TabPage
		Private tabPage3 As System.Windows.Forms.TabPage
	  Private label2 As System.Windows.Forms.Label
	  Private label4 As System.Windows.Forms.Label
	  Private label3 As System.Windows.Forms.Label
	  Private checkBox1 As System.Windows.Forms.CheckBox

	End Class
End Namespace

⌨️ 快捷键说明

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