viewordersdialog.designer.vb
来自「清华大学出版社出版的 移动应用开发宝典 张大威(2008)的附书源代码」· VB 代码 · 共 139 行
VB
139 行
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class ViewOrdersDialog
Inherits System.Windows.Forms.Form
'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container
Dim OrderIdDataGridColumnStyleDataGridTextBoxColumn As System.Windows.Forms.DataGridTextBoxColumn
Dim ProductIdDataGridColumnStyleDataGridTextBoxColumn As System.Windows.Forms.DataGridTextBoxColumn
Dim QuantityDataGridColumnStyleDataGridTextBoxColumn As System.Windows.Forms.DataGridTextBoxColumn
Dim ProductNameDataGridColumnStyleDataGridTextBoxColumn As System.Windows.Forms.DataGridTextBoxColumn
Dim PriceDataGridColumnStyleDataGridTextBoxColumn As System.Windows.Forms.DataGridTextBoxColumn
Me.AppDatabaseDataSet = New DisconnectedServiceAgentExample.AppDatabaseDataSet
Me.OrdersBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.OrdersTableAdapter = New DisconnectedServiceAgentExample.AppDatabaseDataSetTableAdapters.OrdersTableAdapter
Me.OrdersDataGrid = New System.Windows.Forms.DataGrid
Me.OrdersTableStyleDataGridTableStyle = New System.Windows.Forms.DataGridTableStyle
Me.DataGridTextBoxColumn1 = New System.Windows.Forms.DataGridTextBoxColumn
OrderIdDataGridColumnStyleDataGridTextBoxColumn = New System.Windows.Forms.DataGridTextBoxColumn
ProductIdDataGridColumnStyleDataGridTextBoxColumn = New System.Windows.Forms.DataGridTextBoxColumn
QuantityDataGridColumnStyleDataGridTextBoxColumn = New System.Windows.Forms.DataGridTextBoxColumn
ProductNameDataGridColumnStyleDataGridTextBoxColumn = New System.Windows.Forms.DataGridTextBoxColumn
PriceDataGridColumnStyleDataGridTextBoxColumn = New System.Windows.Forms.DataGridTextBoxColumn
Me.SuspendLayout()
'
'AppDatabaseDataSet
'
Me.AppDatabaseDataSet.DataSetName = "AppDatabaseDataSet"
Me.AppDatabaseDataSet.Prefix = ""
Me.AppDatabaseDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
'
'OrdersBindingSource
'
Me.OrdersBindingSource.DataMember = "Orders"
Me.OrdersBindingSource.DataSource = Me.AppDatabaseDataSet
'
'OrdersTableAdapter
'
Me.OrdersTableAdapter.ClearBeforeFill = True
'
'OrdersDataGrid
'
Me.OrdersDataGrid.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(128, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(128, Byte), Integer))
Me.OrdersDataGrid.DataSource = Me.OrdersBindingSource
Me.OrdersDataGrid.Dock = System.Windows.Forms.DockStyle.Fill
Me.OrdersDataGrid.Location = New System.Drawing.Point(0, 0)
Me.OrdersDataGrid.Name = "OrdersDataGrid"
Me.OrdersDataGrid.Size = New System.Drawing.Size(240, 294)
Me.OrdersDataGrid.TabIndex = 0
Me.OrdersDataGrid.TableStyles.Add(Me.OrdersTableStyleDataGridTableStyle)
'
'OrdersTableStyleDataGridTableStyle
'
Me.OrdersTableStyleDataGridTableStyle.GridColumnStyles.Add(OrderIdDataGridColumnStyleDataGridTextBoxColumn)
Me.OrdersTableStyleDataGridTableStyle.GridColumnStyles.Add(Me.DataGridTextBoxColumn1)
Me.OrdersTableStyleDataGridTableStyle.GridColumnStyles.Add(ProductIdDataGridColumnStyleDataGridTextBoxColumn)
Me.OrdersTableStyleDataGridTableStyle.GridColumnStyles.Add(QuantityDataGridColumnStyleDataGridTextBoxColumn)
Me.OrdersTableStyleDataGridTableStyle.GridColumnStyles.Add(ProductNameDataGridColumnStyleDataGridTextBoxColumn)
Me.OrdersTableStyleDataGridTableStyle.GridColumnStyles.Add(PriceDataGridColumnStyleDataGridTextBoxColumn)
Me.OrdersTableStyleDataGridTableStyle.MappingName = "Orders"
'
'OrderIdDataGridColumnStyleDataGridTextBoxColumn
'
OrderIdDataGridColumnStyleDataGridTextBoxColumn.Format = ""
OrderIdDataGridColumnStyleDataGridTextBoxColumn.FormatInfo = Nothing
OrderIdDataGridColumnStyleDataGridTextBoxColumn.HeaderText = "OrderId"
OrderIdDataGridColumnStyleDataGridTextBoxColumn.MappingName = "OrderId"
'
'ProductIdDataGridColumnStyleDataGridTextBoxColumn
'
ProductIdDataGridColumnStyleDataGridTextBoxColumn.Format = ""
ProductIdDataGridColumnStyleDataGridTextBoxColumn.FormatInfo = Nothing
ProductIdDataGridColumnStyleDataGridTextBoxColumn.HeaderText = "ProductId"
ProductIdDataGridColumnStyleDataGridTextBoxColumn.MappingName = "ProductId"
'
'QuantityDataGridColumnStyleDataGridTextBoxColumn
'
QuantityDataGridColumnStyleDataGridTextBoxColumn.Format = ""
QuantityDataGridColumnStyleDataGridTextBoxColumn.FormatInfo = Nothing
QuantityDataGridColumnStyleDataGridTextBoxColumn.HeaderText = "Quantity"
QuantityDataGridColumnStyleDataGridTextBoxColumn.MappingName = "Quantity"
'
'ProductNameDataGridColumnStyleDataGridTextBoxColumn
'
ProductNameDataGridColumnStyleDataGridTextBoxColumn.Format = ""
ProductNameDataGridColumnStyleDataGridTextBoxColumn.FormatInfo = Nothing
ProductNameDataGridColumnStyleDataGridTextBoxColumn.HeaderText = "ProductName"
ProductNameDataGridColumnStyleDataGridTextBoxColumn.MappingName = "ProductName"
'
'PriceDataGridColumnStyleDataGridTextBoxColumn
'
PriceDataGridColumnStyleDataGridTextBoxColumn.Format = ""
PriceDataGridColumnStyleDataGridTextBoxColumn.FormatInfo = Nothing
PriceDataGridColumnStyleDataGridTextBoxColumn.HeaderText = "Price"
PriceDataGridColumnStyleDataGridTextBoxColumn.MappingName = "Price"
'
'DataGridTextBoxColumn1
'
Me.DataGridTextBoxColumn1.Format = ""
Me.DataGridTextBoxColumn1.FormatInfo = Nothing
Me.DataGridTextBoxColumn1.HeaderText = "ServerOrderID"
Me.DataGridTextBoxColumn1.MappingName = "ServerOrderId"
'
'ViewOrdersDialog
'
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.OrdersDataGrid)
Me.MinimizeBox = False
Me.Name = "ViewOrdersDialog"
Me.Text = "View Orders"
Me.ResumeLayout(False)
End Sub
Friend WithEvents AppDatabaseDataSet As DisconnectedServiceAgentExample.AppDatabaseDataSet
Friend WithEvents OrdersBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents OrdersTableAdapter As DisconnectedServiceAgentExample.AppDatabaseDataSetTableAdapters.OrdersTableAdapter
Friend WithEvents OrdersDataGrid As System.Windows.Forms.DataGrid
Friend WithEvents OrdersTableStyleDataGridTableStyle As System.Windows.Forms.DataGridTableStyle
Friend WithEvents DataGridTextBoxColumn1 As System.Windows.Forms.DataGridTextBoxColumn
End Class
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?