frmconnection.designer.vb

Visual Basic 传统数据访问模式ADO

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmConnection
    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 窗体设计器所必需的
    Private components As System.ComponentModel.IContainer

    '注意: 以下过程是 Windows 窗体设计器所必需的
    '可以使用 Windows 窗体设计器修改它。
    '不要使用代码编辑器修改它。
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.btnClose = New System.Windows.Forms.Button
        Me.lbDisplay = New System.Windows.Forms.Label
        Me.btnConnection = New System.Windows.Forms.Button
        Me.Label1 = New System.Windows.Forms.Label
        Me.SuspendLayout()
        '
        'btnClose
        '
        Me.btnClose.Enabled = False
        Me.btnClose.Location = New System.Drawing.Point(172, 100)
        Me.btnClose.Name = "btnClose"
        Me.btnClose.Size = New System.Drawing.Size(108, 23)
        Me.btnClose.TabIndex = 7
        Me.btnClose.Text = "关闭数据库连接"
        Me.btnClose.UseVisualStyleBackColor = True
        '
        'lbDisplay
        '
        Me.lbDisplay.AutoSize = True
        Me.lbDisplay.Location = New System.Drawing.Point(67, 49)
        Me.lbDisplay.Name = "lbDisplay"
        Me.lbDisplay.Size = New System.Drawing.Size(173, 12)
        Me.lbDisplay.TabIndex = 6
        Me.lbDisplay.Text = "数据库尚未连接，连接数据库？"
        '
        'btnConnection
        '
        Me.btnConnection.Location = New System.Drawing.Point(43, 99)
        Me.btnConnection.Name = "btnConnection"
        Me.btnConnection.Size = New System.Drawing.Size(96, 23)
        Me.btnConnection.TabIndex = 5
        Me.btnConnection.Text = "连接数据库"
        Me.btnConnection.UseVisualStyleBackColor = True
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.Font = New System.Drawing.Font("宋体", 15.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.Label1.Location = New System.Drawing.Point(79, 35)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(0, 20)
        Me.Label1.TabIndex = 4
        '
        'frmConnection
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(323, 141)
        Me.Controls.Add(Me.btnClose)
        Me.Controls.Add(Me.lbDisplay)
        Me.Controls.Add(Me.btnConnection)
        Me.Controls.Add(Me.Label1)
        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
        Me.MaximizeBox = False
        Me.Name = "frmConnection"
        Me.Text = "数据库连接"
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents btnClose As System.Windows.Forms.Button
    Friend WithEvents lbDisplay As System.Windows.Forms.Label
    Friend WithEvents btnConnection As System.Windows.Forms.Button
    Friend WithEvents Label1 As System.Windows.Forms.Label

End Class