📄 form1.vb
字号:
'
'TabPage1
'
Me.TabPage1.Controls.Add(Me.Label40)
Me.TabPage1.Controls.Add(Me.Label39)
Me.TabPage1.Controls.Add(Me.ListBox1)
Me.TabPage1.Controls.Add(Me.ComboBox9)
Me.TabPage1.Controls.Add(Me.Button10)
Me.TabPage1.Controls.Add(Me.Button9)
Me.TabPage1.Controls.Add(Me.Button8)
Me.TabPage1.Controls.Add(Me.TextBox21)
Me.TabPage1.Controls.Add(Me.TextBox20)
Me.TabPage1.Controls.Add(Me.TextBox19)
Me.TabPage1.Controls.Add(Me.Label36)
Me.TabPage1.Controls.Add(Me.Label35)
Me.TabPage1.Controls.Add(Me.Label34)
Me.TabPage1.Controls.Add(Me.Label30)
Me.TabPage1.Controls.Add(Me.TextBox16)
Me.TabPage1.Controls.Add(Me.Label29)
Me.TabPage1.Controls.Add(Me.TextBox15)
Me.TabPage1.Controls.Add(Me.Label28)
Me.TabPage1.Controls.Add(Me.Label27)
Me.TabPage1.Controls.Add(Me.TextBox13)
Me.TabPage1.Controls.Add(Me.Label26)
Me.TabPage1.Location = New System.Drawing.Point(4, 21)
Me.TabPage1.Name = "TabPage1"
Me.TabPage1.Size = New System.Drawing.Size(1008, 655)
Me.TabPage1.TabIndex = 0
Me.TabPage1.Text = " 增加车次 "
'
'Label40
'
Me.Label40.Location = New System.Drawing.Point(64, 56)
Me.Label40.Name = "Label40"
Me.Label40.Size = New System.Drawing.Size(96, 24)
Me.Label40.TabIndex = 40
'
'Label39
'
Me.Label39.Location = New System.Drawing.Point(216, 152)
Me.Label39.Name = "Label39"
Me.Label39.Size = New System.Drawing.Size(208, 16)
Me.Label39.TabIndex = 39
Me.Label39.Text = "若要查询已有车次请点击左边的框框"
'
'ListBox1
'
Me.ListBox1.ItemHeight = 12
Me.ListBox1.Location = New System.Drawing.Point(64, 88)
Me.ListBox1.Name = "ListBox1"
Me.ListBox1.Size = New System.Drawing.Size(112, 244)
Me.ListBox1.TabIndex = 38
'
'ComboBox9
'
Me.ComboBox9.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ComboBox9.Items.AddRange(New Object() {"特快硬座", "特快软卧", "普快硬座", "普快软卧"})
Me.ComboBox9.Location = New System.Drawing.Point(320, 208)
Me.ComboBox9.Name = "ComboBox9"
Me.ComboBox9.Size = New System.Drawing.Size(104, 20)
Me.ComboBox9.TabIndex = 1
'
'Button10
'
Me.Button10.Location = New System.Drawing.Point(576, 464)
Me.Button10.Name = "Button10"
Me.Button10.TabIndex = 9
Me.Button10.Text = "退出"
'
'Button9
'
Me.Button9.Location = New System.Drawing.Point(392, 464)
Me.Button9.Name = "Button9"
Me.Button9.TabIndex = 8
Me.Button9.Text = "取消"
'
'Button8
'
Me.Button8.Location = New System.Drawing.Point(192, 464)
Me.Button8.Name = "Button8"
Me.Button8.TabIndex = 7
Me.Button8.Text = "确定"
'
'TextBox21
'
Me.TextBox21.Location = New System.Drawing.Point(632, 232)
Me.TextBox21.Multiline = True
Me.TextBox21.Name = "TextBox21"
Me.TextBox21.Size = New System.Drawing.Size(272, 64)
Me.TextBox21.TabIndex = 5
Me.TextBox21.Text = ""
'
'TextBox20
'
Me.TextBox20.Location = New System.Drawing.Point(632, 152)
Me.TextBox20.Multiline = True
Me.TextBox20.Name = "TextBox20"
Me.TextBox20.Size = New System.Drawing.Size(272, 64)
Me.TextBox20.TabIndex = 4
Me.TextBox20.Text = ""
'
'TextBox19
'
Me.TextBox19.Location = New System.Drawing.Point(632, 72)
Me.TextBox19.Multiline = True
Me.TextBox19.Name = "TextBox19"
Me.TextBox19.Size = New System.Drawing.Size(272, 64)
Me.TextBox19.TabIndex = 3
Me.TextBox19.Text = ""
'
'Label36
'
Me.Label36.AutoSize = True
Me.Label36.Location = New System.Drawing.Point(512, 240)
Me.Label36.Name = "Label36"
Me.Label36.Size = New System.Drawing.Size(60, 17)
Me.Label36.TabIndex = 29
Me.Label36.Text = "相应路程:"
'
'Label35
'
Me.Label35.AutoSize = True
Me.Label35.Location = New System.Drawing.Point(512, 160)
Me.Label35.Name = "Label35"
Me.Label35.Size = New System.Drawing.Size(60, 17)
Me.Label35.TabIndex = 28
Me.Label35.Text = "相应票价:"
'
'Label34
'
Me.Label34.AutoSize = True
Me.Label34.Location = New System.Drawing.Point(512, 320)
Me.Label34.Name = "Label34"
Me.Label34.Size = New System.Drawing.Size(60, 17)
Me.Label34.TabIndex = 27
Me.Label34.Text = "相应时间:"
'
'Label30
'
Me.Label30.AutoSize = True
Me.Label30.Location = New System.Drawing.Point(480, 104)
Me.Label30.Name = "Label30"
Me.Label30.Size = New System.Drawing.Size(116, 17)
Me.Label30.TabIndex = 26
Me.Label30.Text = "注:站名间用"",""表示"
'
'TextBox16
'
Me.TextBox16.Location = New System.Drawing.Point(632, 312)
Me.TextBox16.Multiline = True
Me.TextBox16.Name = "TextBox16"
Me.TextBox16.Size = New System.Drawing.Size(272, 64)
Me.TextBox16.TabIndex = 6
Me.TextBox16.Text = ""
'
'Label29
'
Me.Label29.AutoSize = True
Me.Label29.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.Label29.Location = New System.Drawing.Point(480, 80)
Me.Label29.Name = "Label29"
Me.Label29.Size = New System.Drawing.Size(122, 17)
Me.Label29.TabIndex = 24
Me.Label29.Text = "途经(包括起点终点):"
'
'TextBox15
'
Me.TextBox15.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.TextBox15.Location = New System.Drawing.Point(328, 320)
Me.TextBox15.Name = "TextBox15"
Me.TextBox15.TabIndex = 2
Me.TextBox15.Text = ""
'
'Label28
'
Me.Label28.AutoSize = True
Me.Label28.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.Label28.Location = New System.Drawing.Point(232, 328)
Me.Label28.Name = "Label28"
Me.Label28.Size = New System.Drawing.Size(35, 17)
Me.Label28.TabIndex = 22
Me.Label28.Text = "座位:"
'
'Label27
'
Me.Label27.AutoSize = True
Me.Label27.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.Label27.Location = New System.Drawing.Point(232, 216)
Me.Label27.Name = "Label27"
Me.Label27.Size = New System.Drawing.Size(35, 17)
Me.Label27.TabIndex = 20
Me.Label27.Text = "车型:"
'
'TextBox13
'
Me.TextBox13.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.TextBox13.Location = New System.Drawing.Point(320, 96)
Me.TextBox13.Name = "TextBox13"
Me.TextBox13.TabIndex = 0
Me.TextBox13.Text = ""
'
'Label26
'
Me.Label26.AutoSize = True
Me.Label26.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.Label26.Location = New System.Drawing.Point(224, 96)
Me.Label26.Name = "Label26"
Me.Label26.Size = New System.Drawing.Size(35, 17)
Me.Label26.TabIndex = 18
Me.Label26.Text = "车次:"
'
'TabPage8
'
Me.TabPage8.Controls.Add(Me.Button23)
Me.TabPage8.Controls.Add(Me.Button22)
Me.TabPage8.Controls.Add(Me.DataGrid7)
Me.TabPage8.Controls.Add(Me.Button21)
Me.TabPage8.Controls.Add(Me.TextBox42)
Me.TabPage8.Controls.Add(Me.Label67)
Me.TabPage8.Controls.Add(Me.ComboBox7)
Me.TabPage8.Controls.Add(Me.Label66)
Me.TabPage8.Controls.Add(Me.Label65)
Me.TabPage8.Location = New System.Drawing.Point(4, 21)
Me.TabPage8.Name = "TabPage8"
Me.TabPage8.Size = New System.Drawing.Size(1008, 655)
Me.TabPage8.TabIndex = 7
Me.TabPage8.Text = " 修改车次 "
'
'Button23
'
Me.Button23.Location = New System.Drawing.Point(608, 544)
Me.Button23.Name = "Button23"
Me.Button23.Size = New System.Drawing.Size(80, 32)
Me.Button23.TabIndex = 4
Me.Button23.Text = "退出"
'
'Button22
'
Me.Button22.Enabled = False
Me.Button22.Location = New System.Drawing.Point(304, 544)
Me.Button22.Name = "Button22"
Me.Button22.Size = New System.Drawing.Size(88, 32)
Me.Button22.TabIndex = 3
Me.Button22.Text = "修改"
'
'DataGrid7
'
Me.DataGrid7.DataMember = ""
Me.DataGrid7.HeaderForeColor = System.Drawing.SystemColors.ControlText
Me.DataGrid7.Location = New System.Drawing.Point(40, 144)
Me.DataGrid7.Name = "DataGrid7"
Me.DataGrid7.Size = New System.Drawing.Size(912, 344)
Me.DataGrid7.TabIndex = 6
'
'Button21
'
Me.Button21.Location = New System.Drawing.Point(792, 104)
Me.Button21.Name = "Button21"
Me.Button21.Size = New System.Drawing.Size(72, 24)
Me.Button21.TabIndex = 2
Me.Button21.Text = "查询"
'
'TextBox42
'
Me.TextBox42.Location = New System.Drawing.Point(608, 104)
Me.TextBox42.Name = "TextBox42"
Me.TextBox42.Size = New System.Drawing.Size(128, 21)
Me.TextBox42.TabIndex = 1
Me.TextBox42.Text = ""
'
'Label67
'
Me.Label67.AutoSize = True
Me.Label67.Location = New System.Drawing.Point(504, 104)
Me.Label67.Name = "Label67"
Me.Label67.Size = New System.Drawing.Size(72, 17)
Me.Label67.TabIndex = 3
Me.Label67.Text = "相应关键字:"
'
'ComboBox7
'
Me.ComboBox7.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ComboBox7.Items.AddRange(New Object() {"车次", "途经", "车型", "总座位"})
Me.ComboBox7.Location = New System.Drawing.Point(304, 104)
Me.ComboBox7.Name = "ComboBox7"
Me.ComboBox7.Size = New System.Drawing.Size(136, 20)
Me.ComboBox7.TabIndex = 0
'
'Label66
'
Me.Label66.AutoSize = True
Me.Label66.Location = New System.Drawing.Point(200, 104)
Me.Label66.Name = "Label66"
Me.Label66.Size = New System.Drawing.Size(85, 17)
Me.Label66.TabIndex = 1
Me.Label66.Text = "选择查询条件:"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -