⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 form1.designer.vb

📁 SQL Server 业已成为最为流行的几大数据库之一
💻 VB
字号:
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Form1
    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.Label1 = New System.Windows.Forms.Label
        Me.textSearch = New System.Windows.Forms.TextBox
        Me.editSearch = New System.Windows.Forms.Button
        Me.textResult = New System.Windows.Forms.TextBox
        Me.Label2 = New System.Windows.Forms.Label
        Me.SuspendLayout()
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.Location = New System.Drawing.Point(12, 15)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(77, 12)
        Me.Label1.TabIndex = 0
        Me.Label1.Text = "按项目号查询"
        '
        'textSearch
        '
        Me.textSearch.Location = New System.Drawing.Point(113, 12)
        Me.textSearch.Name = "textSearch"
        Me.textSearch.Size = New System.Drawing.Size(100, 21)
        Me.textSearch.TabIndex = 1
        '
        'editSearch
        '
        Me.editSearch.Location = New System.Drawing.Point(259, 15)
        Me.editSearch.Name = "editSearch"
        Me.editSearch.Size = New System.Drawing.Size(75, 23)
        Me.editSearch.TabIndex = 2
        Me.editSearch.Text = "开始查询"
        Me.editSearch.UseVisualStyleBackColor = True
        '
        'textResult
        '
        Me.textResult.Location = New System.Drawing.Point(26, 106)
        Me.textResult.Multiline = True
        Me.textResult.Name = "textResult"
        Me.textResult.Size = New System.Drawing.Size(295, 93)
        Me.textResult.TabIndex = 3
        '
        'Label2
        '
        Me.Label2.AutoSize = True
        Me.Label2.Location = New System.Drawing.Point(24, 81)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(65, 12)
        Me.Label2.TabIndex = 4
        Me.Label2.Text = "查询结果:"
        '
        'Form1
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(342, 208)
        Me.Controls.Add(Me.Label2)
        Me.Controls.Add(Me.textResult)
        Me.Controls.Add(Me.editSearch)
        Me.Controls.Add(Me.textSearch)
        Me.Controls.Add(Me.Label1)
        Me.Name = "Form1"
        Me.Text = "以OLEDB查询数据表TestTable"
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents Label1 As System.Windows.Forms.Label
    Friend WithEvents textSearch As System.Windows.Forms.TextBox
    Friend WithEvents editSearch As System.Windows.Forms.Button
    Friend WithEvents textResult As System.Windows.Forms.TextBox
    Friend WithEvents Label2 As System.Windows.Forms.Label

End Class

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -