form1.vb

根据系统的长期目标

        Me.DataGrid5.TabIndex = 23
        '
        'Button17
        '
        Me.Button17.Location = New System.Drawing.Point(104, 584)
        Me.Button17.Name = "Button17"
        Me.Button17.TabIndex = 5
        Me.Button17.Text = "查询"
        '
        'TextBox11
        '
        Me.TextBox11.BackColor = System.Drawing.SystemColors.HighlightText
        Me.TextBox11.Location = New System.Drawing.Point(824, 88)
        Me.TextBox11.Name = "TextBox11"
        Me.TextBox11.ReadOnly = True
        Me.TextBox11.Size = New System.Drawing.Size(112, 21)
        Me.TextBox11.TabIndex = 21
        Me.TextBox11.Text = ""
        '
        'Label23
        '
        Me.Label23.AutoSize = True
        Me.Label23.Location = New System.Drawing.Point(728, 88)
        Me.Label23.Name = "Label23"
        Me.Label23.Size = New System.Drawing.Size(60, 17)
        Me.Label23.TabIndex = 20
        Me.Label23.Text = "当前时间:"
        '
        'Button5
        '
        Me.Button5.Location = New System.Drawing.Point(104, 616)
        Me.Button5.Name = "Button5"
        Me.Button5.TabIndex = 11
        Me.Button5.Text = "刷新"
        '
        'Button4
        '
        Me.Button4.Location = New System.Drawing.Point(312, 616)
        Me.Button4.Name = "Button4"
        Me.Button4.TabIndex = 12
        Me.Button4.Text = "退出"
        '
        'Button3
        '
        Me.Button3.Location = New System.Drawing.Point(312, 584)
        Me.Button3.Name = "Button3"
        Me.Button3.TabIndex = 9
        Me.Button3.Text = "订票"
        '
        'DataGrid2
        '
        Me.DataGrid2.DataMember = ""
        Me.DataGrid2.HeaderForeColor = System.Drawing.SystemColors.ControlText
        Me.DataGrid2.Location = New System.Drawing.Point(64, 144)
        Me.DataGrid2.Name = "DataGrid2"
        Me.DataGrid2.ReadOnly = True
        Me.DataGrid2.Size = New System.Drawing.Size(896, 144)
        Me.DataGrid2.TabIndex = 12
        '
        'ComboBox6
        '
        Me.ComboBox6.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.ComboBox6.Items.AddRange(New Object() {"学生  5折", "军人  6折", "华侨  6.5折", "退休干部  4折", "烈士家属  4.5折"})
        Me.ComboBox6.Location = New System.Drawing.Point(352, 88)
        Me.ComboBox6.Name = "ComboBox6"
        Me.ComboBox6.Size = New System.Drawing.Size(121, 20)
        Me.ComboBox6.TabIndex = 4
        '
        'ComboBox5
        '
        Me.ComboBox5.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.ComboBox5.Location = New System.Drawing.Point(104, 88)
        Me.ComboBox5.Name = "ComboBox5"
        Me.ComboBox5.Size = New System.Drawing.Size(121, 20)
        Me.ComboBox5.TabIndex = 3
        '
        'ComboBox4
        '
        Me.ComboBox4.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.ComboBox4.Items.AddRange(New Object() {"特快硬座", "特快软卧", "普快硬座", "普快软卧"})
        Me.ComboBox4.Location = New System.Drawing.Point(616, 40)
        Me.ComboBox4.Name = "ComboBox4"
        Me.ComboBox4.Size = New System.Drawing.Size(121, 20)
        Me.ComboBox4.TabIndex = 2
        '
        'Label20
        '
        Me.Label20.AutoSize = True
        Me.Label20.Location = New System.Drawing.Point(248, 88)
        Me.Label20.Name = "Label20"
        Me.Label20.Size = New System.Drawing.Size(79, 17)
        Me.Label20.TabIndex = 8
        Me.Label20.Text = "享有何种优惠"
        '
        'Label19
        '
        Me.Label19.AutoSize = True
        Me.Label19.Location = New System.Drawing.Point(24, 88)
        Me.Label19.Name = "Label19"
        Me.Label19.Size = New System.Drawing.Size(60, 17)
        Me.Label19.TabIndex = 7
        Me.Label19.Text = "开车日期:"
        '
        'Label18
        '
        Me.Label18.AutoSize = True
        Me.Label18.Location = New System.Drawing.Point(544, 40)
        Me.Label18.Name = "Label18"
        Me.Label18.Size = New System.Drawing.Size(35, 17)
        Me.Label18.TabIndex = 6
        Me.Label18.Text = "车型:"
        '
        'TextBox7
        '
        Me.TextBox7.Location = New System.Drawing.Point(320, 40)
        Me.TextBox7.Name = "TextBox7"
        Me.TextBox7.Size = New System.Drawing.Size(120, 21)
        Me.TextBox7.TabIndex = 1
        Me.TextBox7.Text = ""
        '
        'Label16
        '
        Me.Label16.AutoSize = True
        Me.Label16.Location = New System.Drawing.Point(256, 40)
        Me.Label16.Name = "Label16"
        Me.Label16.Size = New System.Drawing.Size(48, 17)
        Me.Label16.TabIndex = 2
        Me.Label16.Text = "终点站:"
        '
        'TextBox6
        '
        Me.TextBox6.Location = New System.Drawing.Point(104, 40)
        Me.TextBox6.Name = "TextBox6"
        Me.TextBox6.Size = New System.Drawing.Size(120, 21)
        Me.TextBox6.TabIndex = 0
        Me.TextBox6.Text = ""
        '
        'Label15
        '
        Me.Label15.AutoSize = True
        Me.Label15.Location = New System.Drawing.Point(40, 40)
        Me.Label15.Name = "Label15"
        Me.Label15.Size = New System.Drawing.Size(48, 17)
        Me.Label15.TabIndex = 0
        Me.Label15.Text = "起点站:"
        '
        'TabPage4
        '
        Me.TabPage4.Controls.Add(Me.Button12)
        Me.TabPage4.Controls.Add(Me.Button11)
        Me.TabPage4.Controls.Add(Me.Label64)
        Me.TabPage4.Controls.Add(Me.Label63)
        Me.TabPage4.Controls.Add(Me.Label61)
        Me.TabPage4.Controls.Add(Me.TextBox40)
        Me.TabPage4.Controls.Add(Me.ComboBox3)
        Me.TabPage4.Controls.Add(Me.Label58)
        Me.TabPage4.Controls.Add(Me.TextBox38)
        Me.TabPage4.Controls.Add(Me.Label57)
        Me.TabPage4.Controls.Add(Me.TextBox37)
        Me.TabPage4.Controls.Add(Me.Label56)
        Me.TabPage4.Controls.Add(Me.Label33)
        Me.TabPage4.Controls.Add(Me.TextBox18)
        Me.TabPage4.Controls.Add(Me.Label32)
        Me.TabPage4.Controls.Add(Me.TextBox17)
        Me.TabPage4.Controls.Add(Me.Label31)
        Me.TabPage4.Controls.Add(Me.DataGrid3)
        Me.TabPage4.Controls.Add(Me.Label25)
        Me.TabPage4.Controls.Add(Me.TextBox12)
        Me.TabPage4.Controls.Add(Me.Label24)
        Me.TabPage4.Controls.Add(Me.Button7)
        Me.TabPage4.Controls.Add(Me.TextBox1)
        Me.TabPage4.Controls.Add(Me.Label7)
        Me.TabPage4.Controls.Add(Me.ComboBox1)
        Me.TabPage4.Controls.Add(Me.Label6)
        Me.TabPage4.Controls.Add(Me.Label5)
        Me.TabPage4.Controls.Add(Me.Label4)
        Me.TabPage4.Controls.Add(Me.Label2)
        Me.TabPage4.Controls.Add(Me.Label1)
        Me.TabPage4.Controls.Add(Me.cmb车型)
        Me.TabPage4.Controls.Add(Me.btn购票)
        Me.TabPage4.Controls.Add(Me.DataGrid1)
        Me.TabPage4.Controls.Add(Me.btn查询)
        Me.TabPage4.Controls.Add(Me.txt终点站)
        Me.TabPage4.Controls.Add(Me.txt起点站)
        Me.TabPage4.Location = New System.Drawing.Point(4, 21)
        Me.TabPage4.Name = "TabPage4"
        Me.TabPage4.Size = New System.Drawing.Size(1008, 655)
        Me.TabPage4.TabIndex = 3
        Me.TabPage4.Text = "      购票      "
        '
        'Button12
        '
        Me.Button12.Location = New System.Drawing.Point(672, 608)
        Me.Button12.Name = "Button12"
        Me.Button12.Size = New System.Drawing.Size(72, 32)
        Me.Button12.TabIndex = 9
        Me.Button12.Text = "退出"
        '
        'Button11
        '
        Me.Button11.Location = New System.Drawing.Point(528, 608)
        Me.Button11.Name = "Button11"
        Me.Button11.Size = New System.Drawing.Size(72, 32)
        Me.Button11.TabIndex = 8
        Me.Button11.Text = "查询余座"
        '
        'Label64
        '
        Me.Label64.AutoSize = True
        Me.Label64.Location = New System.Drawing.Point(40, 344)
        Me.Label64.Name = "Label64"
        Me.Label64.Size = New System.Drawing.Size(159, 17)
        Me.Label64.TabIndex = 36
        Me.Label64.Text = "满足要求的车次的相应信息:"
        '
        'Label63
        '
        Me.Label63.AutoSize = True
        Me.Label63.Location = New System.Drawing.Point(40, 168)
        Me.Label63.Name = "Label63"
        Me.Label63.Size = New System.Drawing.Size(159, 17)
        Me.Label63.TabIndex = 35
        Me.Label63.Text = "满足要求的车次的所有信息:"
        '
        'Label61
        '
        Me.Label61.AutoSize = True
        Me.Label61.Location = New System.Drawing.Point(224, 584)
        Me.Label61.Name = "Label61"
        Me.Label61.Size = New System.Drawing.Size(29, 17)
        Me.Label61.TabIndex = 34
        Me.Label61.Text = "车次"
        '
        'TextBox40
        '
        Me.TextBox40.BackColor = System.Drawing.SystemColors.HighlightText
        Me.TextBox40.Location = New System.Drawing.Point(144, 584)
        Me.TextBox40.Name = "TextBox40"
        Me.TextBox40.ReadOnly = True
        Me.TextBox40.Size = New System.Drawing.Size(56, 21)
        Me.TextBox40.TabIndex = 33
        Me.TextBox40.Text = ""
        '
        'ComboBox3
        '
        Me.ComboBox3.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.ComboBox3.Location = New System.Drawing.Point(392, 128)
        Me.ComboBox3.Name = "ComboBox3"
        Me.ComboBox3.Size = New System.Drawing.Size(144, 20)
        Me.ComboBox3.TabIndex = 3
        '
        'Label58
        '
        Me.Label58.Location = New System.Drawing.Point(464, 584)
        Me.Label58.Name = "Label58"
        Me.Label58.Size = New System.Drawing.Size(40, 24)
        Me.Label58.TabIndex = 31
        Me.Label58.Text = "座"
        '
        'TextBox38
        '
        Me.TextBox38.BackColor = System.Drawing.SystemColors.HighlightText
        Me.TextBox38.Location = New System.Drawing.Point(392, 584)
        Me.TextBox38.Name = "TextBox38"
        Me.TextBox38.ReadOnly = True
        Me.TextBox38.Size = New System.Drawing.Size(48, 21)
        Me.TextBox38.TabIndex = 30
        Me.TextBox38.Text = ""
        '
        'Label57
        '
        Me.Label57.AutoSize = True
        Me.Label57.Location = New System.Drawing.Point(352, 584)
        Me.Label57.Name = "Label57"
        Me.Label57.Size = New System.Drawing.Size(17, 17)
        Me.Label57.TabIndex = 29
        Me.Label57.Text = "节"
        '
        'TextBox37
        '
        Me.TextBox37.BackColor = System.Drawing.SystemColors.HighlightText
        Me.TextBox37.Location = New System.Drawing.Point(280, 584)
        Me.TextBox37.Name = "TextBox37"
        Me.TextBox37.ReadOnly = True
        Me.TextBox37.Size = New System.Drawing.Size(56, 21)
        Me.TextBox37.TabIndex = 28
        Me.TextBox37.Text = ""
        '
        'Label56
        '
        Me.Label56.AutoSize = True
        Me.Label56.Location =