ch9_demoform001.designer.vb

文件与IO存取,数据绑定,数据库更新,章立民的程序

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class CH9_DemoForm001
    Inherits System.Windows.Forms.Form

    'Form 覆写 Dispose 以清除组件清单。
    <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

    '为 Windows Form 设计工具的必要项
    Private components As System.ComponentModel.IContainer

    '注意: 以下为 Windows Form 设计工具所需的程序
    '可以使用 Windows Form 设计工具进行修改。
    '请不要使用程序代码编辑器进行修改。
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.btnPollingAsynch = New System.Windows.Forms.Button
        Me.FoxDataGridView = New System.Windows.Forms.DataGridView
        Me.LimingchDataGridView = New System.Windows.Forms.DataGridView
        Me.testResultsGroupBox = New System.Windows.Forms.GroupBox
        Me.queryStatusStatusBar = New System.Windows.Forms.ProgressBar
        Me.statusLabel = New System.Windows.Forms.Label
        Me.elapsedTime = New System.Windows.Forms.Label
        Me.elapsedTimeLabel = New System.Windows.Forms.Label
        Me.messageReturned = New System.Windows.Forms.Label
        Me.messageTextLabel = New System.Windows.Forms.Label
        Me.Label1 = New System.Windows.Forms.Label
        CType(Me.FoxDataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LimingchDataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.testResultsGroupBox.SuspendLayout()
        Me.SuspendLayout()
        '
        'btnPollingAsynch
        '
        Me.btnPollingAsynch.Location = New System.Drawing.Point(400, 55)
        Me.btnPollingAsynch.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
        Me.btnPollingAsynch.Name = "btnPollingAsynch"
        Me.btnPollingAsynch.Size = New System.Drawing.Size(152, 51)
        Me.btnPollingAsynch.TabIndex = 0
        Me.btnPollingAsynch.Text = "开始执行异步查询"
        Me.btnPollingAsynch.UseVisualStyleBackColor = True
        '
        'FoxDataGridView
        '
        Me.FoxDataGridView.Location = New System.Drawing.Point(8, 276)
        Me.FoxDataGridView.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
        Me.FoxDataGridView.Name = "FoxDataGridView"
        Me.FoxDataGridView.ReadOnly = True
        Me.FoxDataGridView.RowTemplate.Height = 27
        Me.FoxDataGridView.Size = New System.Drawing.Size(588, 121)
        Me.FoxDataGridView.TabIndex = 18
        Me.FoxDataGridView.Text = "dataGridView2"
        '
        'LimingchDataGridView
        '
        Me.LimingchDataGridView.Location = New System.Drawing.Point(10, 161)
        Me.LimingchDataGridView.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
        Me.LimingchDataGridView.Name = "LimingchDataGridView"
        Me.LimingchDataGridView.ReadOnly = True
        Me.LimingchDataGridView.RowTemplate.Height = 27
        Me.LimingchDataGridView.Size = New System.Drawing.Size(588, 102)
        Me.LimingchDataGridView.TabIndex = 17
        Me.LimingchDataGridView.Text = "dataGridView1"
        '
        'testResultsGroupBox
        '
        Me.testResultsGroupBox.Controls.Add(Me.queryStatusStatusBar)
        Me.testResultsGroupBox.Controls.Add(Me.statusLabel)
        Me.testResultsGroupBox.Controls.Add(Me.elapsedTime)
        Me.testResultsGroupBox.Controls.Add(Me.elapsedTimeLabel)
        Me.testResultsGroupBox.Controls.Add(Me.messageReturned)
        Me.testResultsGroupBox.Controls.Add(Me.messageTextLabel)
        Me.testResultsGroupBox.Location = New System.Drawing.Point(8, 39)
        Me.testResultsGroupBox.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
        Me.testResultsGroupBox.Name = "testResultsGroupBox"
        Me.testResultsGroupBox.Padding = New System.Windows.Forms.Padding(3, 2, 3, 2)
        Me.testResultsGroupBox.Size = New System.Drawing.Size(387, 110)
        Me.testResultsGroupBox.TabIndex = 16
        Me.testResultsGroupBox.TabStop = False
        Me.testResultsGroupBox.Text = "测试结果"
        '
        'queryStatusStatusBar
        '
        Me.queryStatusStatusBar.Enabled = False
        Me.queryStatusStatusBar.Location = New System.Drawing.Point(73, 72)
        Me.queryStatusStatusBar.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
        Me.queryStatusStatusBar.Name = "queryStatusStatusBar"
        Me.queryStatusStatusBar.Size = New System.Drawing.Size(308, 22)
        Me.queryStatusStatusBar.TabIndex = 5
        '
        'statusLabel
        '
        Me.statusLabel.AutoSize = True
        Me.statusLabel.Enabled = False
        Me.statusLabel.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.statusLabel.Location = New System.Drawing.Point(27, 72)
        Me.statusLabel.Name = "statusLabel"
        Me.statusLabel.Size = New System.Drawing.Size(46, 13)
        Me.statusLabel.TabIndex = 4
        Me.statusLabel.Text = "状态："
        '
        'elapsedTime
        '
        Me.elapsedTime.AutoSize = True
        Me.elapsedTime.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
        Me.elapsedTime.Location = New System.Drawing.Point(73, 50)
        Me.elapsedTime.Name = "elapsedTime"
        Me.elapsedTime.Size = New System.Drawing.Size(2, 14)
        Me.elapsedTime.TabIndex = 3
        '
        'elapsedTimeLabel
        '
        Me.elapsedTimeLabel.AutoSize = True
        Me.elapsedTimeLabel.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.elapsedTimeLabel.Location = New System.Drawing.Point(4, 50)
        Me.elapsedTimeLabel.Name = "elapsedTimeLabel"
        Me.elapsedTimeLabel.Size = New System.Drawing.Size(72, 13)
        Me.elapsedTimeLabel.TabIndex = 2
        Me.elapsedTimeLabel.Text = "经过时间："
        '
        'messageReturned
        '
        Me.messageReturned.AutoSize = True
        Me.messageReturned.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
        Me.messageReturned.Location = New System.Drawing.Point(73, 26)
        Me.messageReturned.Name = "messageReturned"
        Me.messageReturned.Size = New System.Drawing.Size(2, 14)
        Me.messageReturned.TabIndex = 1
        '
        'messageTextLabel
        '
        Me.messageTextLabel.AutoSize = True
        Me.messageTextLabel.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.messageTextLabel.Location = New System.Drawing.Point(27, 24)
        Me.messageTextLabel.Name = "messageTextLabel"
        Me.messageTextLabel.Size = New System.Drawing.Size(46, 13)
        Me.messageTextLabel.TabIndex = 0
        Me.messageTextLabel.Text = "信息："
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.Font = New System.Drawing.Font("宋体", 14.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.Label1.Location = New System.Drawing.Point(12, 7)
        Me.Label1.Margin = New System.Windows.Forms.Padding(2, 0, 2, 0)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(580, 19)
        Me.Label1.TabIndex = 19
        Me.Label1.Text = "使用 IAsyncResult 的查询（Polling）方式来执行异步查询操作"
        '
        'CH9_DemoForm001
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(606, 405)
        Me.Controls.Add(Me.Label1)
        Me.Controls.Add(Me.FoxDataGridView)
        Me.Controls.Add(Me.LimingchDataGridView)
        Me.Controls.Add(Me.testResultsGroupBox)
        Me.Controls.Add(Me.btnPollingAsynch)
        Me.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
        Me.MaximizeBox = False
        Me.MinimizeBox = False
        Me.Name = "CH9_DemoForm001"
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
        Me.Text = "使用 IAsyncResult 的查询（Polling）方式来执行异步查询操作"
        CType(Me.FoxDataGridView, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LimingchDataGridView, System.ComponentModel.ISupportInitialize).EndInit()
        Me.testResultsGroupBox.ResumeLayout(False)
        Me.testResultsGroupBox.PerformLayout()
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents btnPollingAsynch As System.Windows.Forms.Button
    Friend WithEvents FoxDataGridView As System.Windows.Forms.DataGridView
    Friend WithEvents LimingchDataGridView As System.Windows.Forms.DataGridView
    Friend WithEvents testResultsGroupBox As System.Windows.Forms.GroupBox
    Friend WithEvents queryStatusStatusBar As System.Windows.Forms.ProgressBar
    Friend WithEvents statusLabel As System.Windows.Forms.Label
    Friend WithEvents elapsedTime As System.Windows.Forms.Label
    Friend WithEvents elapsedTimeLabel As System.Windows.Forms.Label
    Friend WithEvents messageReturned As System.Windows.Forms.Label
    Friend WithEvents messageTextLabel As System.Windows.Forms.Label
    Friend WithEvents Label1 As System.Windows.Forms.Label
End Class