formtraffic.designer.vb

来自「清华大学出版社出版的 移动应用开发宝典 张大威（2008）的附书源代码」· VB 代码 · 共 338 行 · 第 1/2 页

            Me.tabPage7.Controls.Add(Me.label4)
            Me.tabPage7.Location = New System.Drawing.Point(0, 0)
            Me.tabPage7.Name = "tabPage7"
            Me.tabPage7.Size = New System.Drawing.Size(224, 254)
            Me.tabPage7.Text = "Observations"
            '
            'tabPage5
            '
            Me.tabPage5.Controls.Add(Me.dataGrid1)
            Me.tabPage5.Controls.Add(Me.buttonPush)
            Me.tabPage5.Controls.Add(Me.label2)
            Me.tabPage5.Controls.Add(Me.buttonAddCar)
            Me.tabPage5.Controls.Add(Me.textBoxLocation)
            Me.tabPage5.Controls.Add(Me.textBoxReg)
            Me.tabPage5.Controls.Add(Me.label1)
            Me.tabPage5.Location = New System.Drawing.Point(0, 0)
            Me.tabPage5.Name = "tabPage5"
            Me.tabPage5.Size = New System.Drawing.Size(240, 257)
            Me.tabPage5.Text = "Cars"
            '
            'dataGrid1
            '
            Me.dataGrid1.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(128, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(128, Byte), Integer))
            Me.dataGrid1.DataSource = Me.bindingSource1
            Me.dataGrid1.Location = New System.Drawing.Point(6, 3)
            Me.dataGrid1.Name = "dataGrid1"
            Me.dataGrid1.Size = New System.Drawing.Size(213, 123)
            Me.dataGrid1.TabIndex = 9
            Me.dataGrid1.TableStyles.Add(Me.dataGridTableStyle1)
            '
            'dataGridTableStyle1
            '
            Me.dataGridTableStyle1.GridColumnStyles.Add(Me.dataGridTextBoxColumn1)
            Me.dataGridTableStyle1.GridColumnStyles.Add(Me.dataGridTextBoxColumn2)
            Me.dataGridTableStyle1.GridColumnStyles.Add(Me.dataGridTextBoxColumn3)
            Me.dataGridTableStyle1.MappingName = "Cars"
            '
            'dataGridTextBoxColumn1
            '
            Me.dataGridTextBoxColumn1.Format = ""
            Me.dataGridTextBoxColumn1.FormatInfo = Nothing
            Me.dataGridTextBoxColumn1.HeaderText = "ID"
            Me.dataGridTextBoxColumn1.MappingName = "CarID"
            Me.dataGridTextBoxColumn1.PropertyDescriptor = Nothing
            Me.dataGridTextBoxColumn1.Width = 30
            '
            'dataGridTextBoxColumn2
            '
            Me.dataGridTextBoxColumn2.Format = ""
            Me.dataGridTextBoxColumn2.FormatInfo = Nothing
            Me.dataGridTextBoxColumn2.HeaderText = "Reg"
            Me.dataGridTextBoxColumn2.MappingName = "Reg"
            Me.dataGridTextBoxColumn2.PropertyDescriptor = Nothing
            Me.dataGridTextBoxColumn2.Width = 80
            '
            'dataGridTextBoxColumn3
            '
            Me.dataGridTextBoxColumn3.Format = ""
            Me.dataGridTextBoxColumn3.FormatInfo = Nothing
            Me.dataGridTextBoxColumn3.HeaderText = "Location"
            Me.dataGridTextBoxColumn3.MappingName = "Location"
            Me.dataGridTextBoxColumn3.PropertyDescriptor = Nothing
            Me.dataGridTextBoxColumn3.Width = 200
            '
            'buttonPush
            '
            Me.buttonPush.Location = New System.Drawing.Point(8, 224)
            Me.buttonPush.Name = "buttonPush"
            Me.buttonPush.Size = New System.Drawing.Size(89, 24)
            Me.buttonPush.TabIndex = 6
            Me.buttonPush.Text = "Push"
            '
            'label2
            '
            Me.label2.Location = New System.Drawing.Point(8, 156)
            Me.label2.Name = "label2"
            Me.label2.Size = New System.Drawing.Size(64, 16)
            Me.label2.Text = "Location:"
            '
            'buttonAddCar
            '
            Me.buttonAddCar.Enabled = False
            Me.buttonAddCar.Location = New System.Drawing.Point(137, 224)
            Me.buttonAddCar.Name = "buttonAddCar"
            Me.buttonAddCar.Size = New System.Drawing.Size(81, 24)
            Me.buttonAddCar.TabIndex = 1
            Me.buttonAddCar.Text = "Add Car"
            '
            'textBoxLocation
            '
            Me.textBoxLocation.Location = New System.Drawing.Point(8, 172)
            Me.textBoxLocation.MaxLength = 100
            Me.textBoxLocation.Multiline = True
            Me.textBoxLocation.Name = "textBoxLocation"
            Me.textBoxLocation.ScrollBars = System.Windows.Forms.ScrollBars.Both
            Me.textBoxLocation.Size = New System.Drawing.Size(216, 40)
            Me.textBoxLocation.TabIndex = 2
            '
            'textBoxReg
            '
            Me.textBoxReg.Location = New System.Drawing.Point(80, 132)
            Me.textBoxReg.MaxLength = 10
            Me.textBoxReg.Name = "textBoxReg"
            Me.textBoxReg.Size = New System.Drawing.Size(96, 21)
            Me.textBoxReg.TabIndex = 3
            '
            'label1
            '
            Me.label1.Location = New System.Drawing.Point(8, 132)
            Me.label1.Name = "label1"
            Me.label1.Size = New System.Drawing.Size(104, 24)
            Me.label1.Text = "Registration:"
            '
            'tabControl2
            '
            Me.tabControl2.Controls.Add(Me.tabPage5)
            Me.tabControl2.Controls.Add(Me.tabPage7)
            Me.tabControl2.Location = New System.Drawing.Point(0, 0)
            Me.tabControl2.Name = "tabControl2"
            Me.tabControl2.SelectedIndex = 0
            Me.tabControl2.Size = New System.Drawing.Size(240, 280)
            Me.tabControl2.TabIndex = 1
            '
            'FormTraffic
            '
            Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!)
            Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Dpi
            Me.AutoScroll = True
            Me.ClientSize = New System.Drawing.Size(240, 294)
            Me.Controls.Add(Me.tabControl2)
            Me.Name = "FormTraffic"
            Me.Text = "FormTraffic"
            Me.tabPage7.ResumeLayout(False)
            Me.tabPage5.ResumeLayout(False)
            Me.tabControl2.ResumeLayout(False)
            Me.ResumeLayout(False)

        End Sub
        Private WithEvents textBoxNote As System.Windows.Forms.TextBox
        Private WithEvents label6 As System.Windows.Forms.Label
        Private WithEvents textBoxtime As System.Windows.Forms.TextBox
        Private WithEvents textBoxDate As System.Windows.Forms.TextBox
        Private WithEvents label5 As System.Windows.Forms.Label
        Private WithEvents label3 As System.Windows.Forms.Label
        Private WithEvents buttonAddObs As System.Windows.Forms.Button
        Private WithEvents columnHeader5 As System.Windows.Forms.ColumnHeader
        Private WithEvents columnHeader6 As System.Windows.Forms.ColumnHeader
        Private WithEvents labelReg As System.Windows.Forms.Label
        Private WithEvents label4 As System.Windows.Forms.Label
        Private WithEvents labelLocation As System.Windows.Forms.Label
        Private WithEvents columnHeader4 As System.Windows.Forms.ColumnHeader
        Private WithEvents listViewObs As System.Windows.Forms.ListView
        Private WithEvents tabPage7 As System.Windows.Forms.TabPage
        Private WithEvents tabPage5 As System.Windows.Forms.TabPage
        Private WithEvents bindingSource1 As System.Windows.Forms.BindingSource
        Private WithEvents dataGrid1 As System.Windows.Forms.DataGrid
        Private WithEvents dataGridTableStyle1 As System.Windows.Forms.DataGridTableStyle
        Private WithEvents dataGridTextBoxColumn1 As System.Windows.Forms.DataGridTextBoxColumn
        Private WithEvents dataGridTextBoxColumn2 As System.Windows.Forms.DataGridTextBoxColumn
        Private WithEvents dataGridTextBoxColumn3 As System.Windows.Forms.DataGridTextBoxColumn
        Private WithEvents buttonPush As System.Windows.Forms.Button
        Private WithEvents label2 As System.Windows.Forms.Label
        Private WithEvents buttonAddCar As System.Windows.Forms.Button
        Private WithEvents textBoxLocation As System.Windows.Forms.TextBox
        Private WithEvents textBoxReg As System.Windows.Forms.TextBox
        Private WithEvents label1 As System.Windows.Forms.Label
        Private WithEvents tabControl2 As System.Windows.Forms.TabControl
    End Class
End Namespace