Partial Class FrmChangeHotel Inherits System.Windows.Forms.Form 'Form 重写 Dispose,以清理组件列表。 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 'Windows 窗体设计器所必需的 Private components As System.ComponentModel.IContainer '注意: 以下过程是 Windows 窗体设计器所必需的 '可以使用 Windows 窗体设计器修改它。 '不要使用代码编辑器修改它。 Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmChangeHotel)) Me.SqLiteCommand1 = New System.Data.SQLite.SQLiteCommand() Me.grd_HolteList = New FlexCell.Grid() Me.tv_GroupList = New System.Windows.Forms.TreeView() Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components) Me.LblUserInfo = New System.Windows.Forms.Label() Me.OK_Button = New System.Windows.Forms.Button() Me.Cancel_Button = New System.Windows.Forms.Button() Me.lab_CurrentHotelGroup = New System.Windows.Forms.Label() Me.lab_CurrentHotel = New System.Windows.Forms.Label() Me.Button2 = New System.Windows.Forms.Button() Me.TextBox1 = New System.Windows.Forms.TextBox() Me.SuspendLayout ' 'SqLiteCommand1 ' Me.SqLiteCommand1.CommandText = Nothing ' 'grd_HolteList ' Me.grd_HolteList.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left),System.Windows.Forms.AnchorStyles) Me.grd_HolteList.BackColorActiveCellSel = System.Drawing.Color.FromArgb(CType(CType(128,Byte),Integer), CType(CType(128,Byte),Integer), CType(CType(255,Byte),Integer)) Me.grd_HolteList.BackColorBkg = System.Drawing.SystemColors.Control Me.grd_HolteList.BorderColor = System.Drawing.SystemColors.ScrollBar Me.grd_HolteList.BorderStyle = FlexCell.BorderStyleEnum.Light3D Me.grd_HolteList.CheckedImage = Nothing Me.grd_HolteList.DefaultFont = New System.Drawing.Font("宋体", 9.75!) Me.grd_HolteList.Font = New System.Drawing.Font("宋体", 9!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134,Byte)) Me.grd_HolteList.GridColor = System.Drawing.SystemColors.ActiveBorder Me.grd_HolteList.Location = New System.Drawing.Point(200, 107) Me.grd_HolteList.Name = "grd_HolteList" Me.grd_HolteList.ScrollBars = FlexCell.ScrollBarsEnum.Vertical Me.grd_HolteList.Size = New System.Drawing.Size(395, 490) Me.grd_HolteList.TabIndex = 12 Me.grd_HolteList.UncheckedImage = Nothing ' 'tv_GroupList ' Me.tv_GroupList.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left),System.Windows.Forms.AnchorStyles) Me.tv_GroupList.Font = New System.Drawing.Font("宋体", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134,Byte)) Me.tv_GroupList.ForeColor = System.Drawing.Color.Black Me.tv_GroupList.ImageIndex = 10 Me.tv_GroupList.ImageList = Me.ImageList1 Me.tv_GroupList.ItemHeight = 25 Me.tv_GroupList.LineColor = System.Drawing.Color.Gray Me.tv_GroupList.Location = New System.Drawing.Point(8, 107) Me.tv_GroupList.Name = "tv_GroupList" Me.tv_GroupList.SelectedImageIndex = 10 Me.tv_GroupList.Size = New System.Drawing.Size(186, 490) Me.tv_GroupList.TabIndex = 11 ' 'ImageList1 ' Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"),System.Windows.Forms.ImageListStreamer) Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent Me.ImageList1.Images.SetKeyName(0, "主页-绿色64x64.png") Me.ImageList1.Images.SetKeyName(1, "02946.ico") Me.ImageList1.Images.SetKeyName(2, "00017.ico") Me.ImageList1.Images.SetKeyName(3, "01957.ico") Me.ImageList1.Images.SetKeyName(4, "03716.ico") Me.ImageList1.Images.SetKeyName(5, "04167.ico") Me.ImageList1.Images.SetKeyName(6, "05959.ico") Me.ImageList1.Images.SetKeyName(7, "06361.ico") Me.ImageList1.Images.SetKeyName(8, "06674.ico") Me.ImageList1.Images.SetKeyName(9, "07387.ico") Me.ImageList1.Images.SetKeyName(10, "09664.ico") Me.ImageList1.Images.SetKeyName(11, "09665.ico") Me.ImageList1.Images.SetKeyName(12, "09770.ico") Me.ImageList1.Images.SetKeyName(13, "10021.ico") ' 'LblUserInfo ' Me.LblUserInfo.AutoSize = true Me.LblUserInfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 12!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134,Byte)) Me.LblUserInfo.ForeColor = System.Drawing.Color.Black Me.LblUserInfo.Location = New System.Drawing.Point(4, 4) Me.LblUserInfo.Name = "LblUserInfo" Me.LblUserInfo.Size = New System.Drawing.Size(163, 20) Me.LblUserInfo.TabIndex = 9 Me.LblUserInfo.Text = "Current selection:" ' 'OK_Button ' Me.OK_Button.Anchor = System.Windows.Forms.AnchorStyles.None Me.OK_Button.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.OK_Button.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer)) Me.OK_Button.Image = Global.BLV_Studio.My.Resources.Resources._01664 Me.OK_Button.Location = New System.Drawing.Point(482, 4) Me.OK_Button.Name = "OK_Button" Me.OK_Button.Size = New System.Drawing.Size(112, 36) Me.OK_Button.TabIndex = 0 Me.OK_Button.Text = "OK" Me.OK_Button.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.OK_Button.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText ' 'Cancel_Button ' Me.Cancel_Button.Anchor = System.Windows.Forms.AnchorStyles.None Me.Cancel_Button.DialogResult = System.Windows.Forms.DialogResult.Cancel Me.Cancel_Button.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Cancel_Button.ForeColor = System.Drawing.Color.Maroon Me.Cancel_Button.Image = Global.BLV_Studio.My.Resources.Resources._01088 Me.Cancel_Button.Location = New System.Drawing.Point(482, 41) Me.Cancel_Button.Name = "Cancel_Button" Me.Cancel_Button.Size = New System.Drawing.Size(112, 36) Me.Cancel_Button.TabIndex = 1 Me.Cancel_Button.Text = "Cancel" Me.Cancel_Button.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.Cancel_Button.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText ' 'lab_CurrentHotelGroup ' Me.lab_CurrentHotelGroup.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.lab_CurrentHotelGroup.ForeColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer)) Me.lab_CurrentHotelGroup.Location = New System.Drawing.Point(33, 24) Me.lab_CurrentHotelGroup.Name = "lab_CurrentHotelGroup" Me.lab_CurrentHotelGroup.Size = New System.Drawing.Size(280, 27) Me.lab_CurrentHotelGroup.TabIndex = 13 Me.lab_CurrentHotelGroup.TextAlign = System.Drawing.ContentAlignment.MiddleLeft ' 'lab_CurrentHotel ' Me.lab_CurrentHotel.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.lab_CurrentHotel.ForeColor = System.Drawing.Color.Blue Me.lab_CurrentHotel.Location = New System.Drawing.Point(33, 51) Me.lab_CurrentHotel.Name = "lab_CurrentHotel" Me.lab_CurrentHotel.Size = New System.Drawing.Size(280, 25) Me.lab_CurrentHotel.TabIndex = 13 Me.lab_CurrentHotel.TextAlign = System.Drawing.ContentAlignment.MiddleLeft ' 'Button2 ' Me.Button2.Font = New System.Drawing.Font("宋体", 10.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Button2.ForeColor = System.Drawing.SystemColors.ControlText Me.Button2.Location = New System.Drawing.Point(482, 80) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(112, 26) Me.Button2.TabIndex = 15 Me.Button2.Text = "Search" Me.Button2.UseVisualStyleBackColor = true ' 'TextBox1 ' Me.TextBox1.Location = New System.Drawing.Point(245, 83) Me.TextBox1.Name = "TextBox1" Me.TextBox1.Size = New System.Drawing.Size(234, 21) Me.TextBox1.TabIndex = 14 ' 'FrmChangeHotel ' Me.AcceptButton = Me.OK_Button Me.AutoScaleDimensions = New System.Drawing.SizeF(6!, 12!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.CancelButton = Me.Cancel_Button Me.ClientSize = New System.Drawing.Size(599, 600) Me.Controls.Add(Me.Button2) Me.Controls.Add(Me.TextBox1) Me.Controls.Add(Me.OK_Button) Me.Controls.Add(Me.grd_HolteList) Me.Controls.Add(Me.Cancel_Button) Me.Controls.Add(Me.tv_GroupList) Me.Controls.Add(Me.LblUserInfo) Me.Controls.Add(Me.lab_CurrentHotel) Me.Controls.Add(Me.lab_CurrentHotelGroup) Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog Me.MaximizeBox = false Me.MinimizeBox = false Me.Name = "FrmChangeHotel" Me.ShowInTaskbar = false Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent Me.Text = "FrmChangeHotel" Me.ResumeLayout(false) Me.PerformLayout End Sub Friend WithEvents Cancel_Button As System.Windows.Forms.Button Friend WithEvents SqLiteCommand1 As SQLite.SQLiteCommand Friend WithEvents grd_HolteList As FlexCell.Grid Friend WithEvents tv_GroupList As TreeView Friend WithEvents LblUserInfo As Label Friend WithEvents OK_Button As Button Friend WithEvents lab_CurrentHotelGroup As Label Friend WithEvents lab_CurrentHotel As Label Friend WithEvents ImageList1 As ImageList Friend WithEvents Button2 As Button Friend WithEvents TextBox1 As TextBox End Class