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

📄 frmaddclass.designer.vb

📁 通用学籍管理软件 vb开发access数据库的实例
💻 VB
字号:
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class FrmAddClass
    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.TxtClassName = New System.Windows.Forms.TextBox
        Me.BtnAdd = New System.Windows.Forms.Button
        Me.Label2 = New System.Windows.Forms.Label
        Me.DGVClass = New System.Windows.Forms.DataGridView
        CType(Me.DGVClass, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.Location = New System.Drawing.Point(12, 17)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(89, 12)
        Me.Label1.TabIndex = 0
        Me.Label1.Text = "新增班级名称:"
        '
        'TxtClassName
        '
        Me.TxtClassName.Location = New System.Drawing.Point(16, 41)
        Me.TxtClassName.MaxLength = 10
        Me.TxtClassName.Name = "TxtClassName"
        Me.TxtClassName.Size = New System.Drawing.Size(110, 21)
        Me.TxtClassName.TabIndex = 1
        '
        'BtnAdd
        '
        Me.BtnAdd.Location = New System.Drawing.Point(20, 78)
        Me.BtnAdd.Name = "BtnAdd"
        Me.BtnAdd.Size = New System.Drawing.Size(105, 25)
        Me.BtnAdd.TabIndex = 2
        Me.BtnAdd.Text = "增加"
        Me.BtnAdd.UseVisualStyleBackColor = True
        '
        'Label2
        '
        Me.Label2.AutoSize = True
        Me.Label2.Location = New System.Drawing.Point(152, 17)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(65, 12)
        Me.Label2.TabIndex = 3
        Me.Label2.Text = "已有班级:"
        '
        'DGVClass
        '
        Me.DGVClass.AllowUserToAddRows = False
        Me.DGVClass.AllowUserToDeleteRows = False
        Me.DGVClass.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
        Me.DGVClass.Location = New System.Drawing.Point(154, 41)
        Me.DGVClass.Name = "DGVClass"
        Me.DGVClass.ReadOnly = True
        Me.DGVClass.RowTemplate.Height = 23
        Me.DGVClass.Size = New System.Drawing.Size(231, 214)
        Me.DGVClass.TabIndex = 4
        '
        'FrmAddClass
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(397, 267)
        Me.Controls.Add(Me.DGVClass)
        Me.Controls.Add(Me.Label2)
        Me.Controls.Add(Me.BtnAdd)
        Me.Controls.Add(Me.TxtClassName)
        Me.Controls.Add(Me.Label1)
        Me.MaximizeBox = False
        Me.MinimizeBox = False
        Me.Name = "FrmAddClass"
        Me.Text = "新增班级"
        CType(Me.DGVClass, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents Label1 As System.Windows.Forms.Label
    Friend WithEvents TxtClassName As System.Windows.Forms.TextBox
    Friend WithEvents BtnAdd As System.Windows.Forms.Button
    Friend WithEvents Label2 As System.Windows.Forms.Label
    Friend WithEvents DGVClass As System.Windows.Forms.DataGridView
End Class

⌨️ 快捷键说明

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