?? readermanage.vb
字號:
Public Class frmReaderManage
Inherits System.Windows.Forms.Form
#Region " Windows 窗體設計器生成的代碼 "
Public Sub New()
MyBase.New()
'該調用是 Windows 窗體設計器所必需的。
InitializeComponent()
'在 InitializeComponent() 調用之后添加任何初始化
End Sub
'窗體重寫 dispose 以清理組件列表。
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Windows 窗體設計器所必需的
Private components As System.ComponentModel.IContainer
'注意: 以下過程是 Windows 窗體設計器所必需的
'可以使用 Windows 窗體設計器修改此過程。
'不要使用代碼編輯器修改它。
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents Label4 As System.Windows.Forms.Label
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents Label6 As System.Windows.Forms.Label
Friend WithEvents Label7 As System.Windows.Forms.Label
Friend WithEvents Label8 As System.Windows.Forms.Label
Friend WithEvents Label9 As System.Windows.Forms.Label
Friend WithEvents Label10 As System.Windows.Forms.Label
Friend WithEvents cmbSex As System.Windows.Forms.ComboBox
Friend WithEvents txtReaderName As System.Windows.Forms.TextBox
Friend WithEvents txtReaderId As System.Windows.Forms.TextBox
Friend WithEvents txtAddress As System.Windows.Forms.TextBox
Friend WithEvents txtDepartment As System.Windows.Forms.TextBox
Friend WithEvents txtTelephone As System.Windows.Forms.TextBox
Friend WithEvents txtDemo As System.Windows.Forms.TextBox
Friend WithEvents txtBorrowCount As System.Windows.Forms.TextBox
Friend WithEvents cmbType As System.Windows.Forms.ComboBox
Friend WithEvents btnSave As System.Windows.Forms.Button
Friend WithEvents btnModify As System.Windows.Forms.Button
Friend WithEvents btnDelete As System.Windows.Forms.Button
Friend WithEvents btnClose As System.Windows.Forms.Button
Friend WithEvents cmbAddTime As System.Windows.Forms.ComboBox
Friend WithEvents mcdAddTime As System.Windows.Forms.MonthCalendar
Friend WithEvents btnDown As System.Windows.Forms.Button
Friend WithEvents btnEnd As System.Windows.Forms.Button
Friend WithEvents btnUp As System.Windows.Forms.Button
Friend WithEvents btnFirst As System.Windows.Forms.Button
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.GroupBox1 = New System.Windows.Forms.GroupBox
Me.mcdAddTime = New System.Windows.Forms.MonthCalendar
Me.txtReaderName = New System.Windows.Forms.TextBox
Me.Label1 = New System.Windows.Forms.Label
Me.txtReaderId = New System.Windows.Forms.TextBox
Me.Label2 = New System.Windows.Forms.Label
Me.Label3 = New System.Windows.Forms.Label
Me.Label4 = New System.Windows.Forms.Label
Me.Label5 = New System.Windows.Forms.Label
Me.txtAddress = New System.Windows.Forms.TextBox
Me.txtDepartment = New System.Windows.Forms.TextBox
Me.Label6 = New System.Windows.Forms.Label
Me.Label7 = New System.Windows.Forms.Label
Me.txtTelephone = New System.Windows.Forms.TextBox
Me.Label8 = New System.Windows.Forms.Label
Me.txtDemo = New System.Windows.Forms.TextBox
Me.txtBorrowCount = New System.Windows.Forms.TextBox
Me.Label9 = New System.Windows.Forms.Label
Me.Label10 = New System.Windows.Forms.Label
Me.cmbSex = New System.Windows.Forms.ComboBox
Me.cmbType = New System.Windows.Forms.ComboBox
Me.cmbAddTime = New System.Windows.Forms.ComboBox
Me.btnSave = New System.Windows.Forms.Button
Me.btnModify = New System.Windows.Forms.Button
Me.btnDelete = New System.Windows.Forms.Button
Me.btnClose = New System.Windows.Forms.Button
Me.btnDown = New System.Windows.Forms.Button
Me.btnEnd = New System.Windows.Forms.Button
Me.btnUp = New System.Windows.Forms.Button
Me.btnFirst = New System.Windows.Forms.Button
Me.GroupBox2 = New System.Windows.Forms.GroupBox
Me.GroupBox1.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.SuspendLayout()
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.mcdAddTime)
Me.GroupBox1.Controls.Add(Me.txtReaderName)
Me.GroupBox1.Controls.Add(Me.Label1)
Me.GroupBox1.Controls.Add(Me.txtReaderId)
Me.GroupBox1.Controls.Add(Me.Label2)
Me.GroupBox1.Controls.Add(Me.Label3)
Me.GroupBox1.Controls.Add(Me.Label4)
Me.GroupBox1.Controls.Add(Me.Label5)
Me.GroupBox1.Controls.Add(Me.txtAddress)
Me.GroupBox1.Controls.Add(Me.txtDepartment)
Me.GroupBox1.Controls.Add(Me.Label6)
Me.GroupBox1.Controls.Add(Me.Label7)
Me.GroupBox1.Controls.Add(Me.txtTelephone)
Me.GroupBox1.Controls.Add(Me.Label8)
Me.GroupBox1.Controls.Add(Me.txtDemo)
Me.GroupBox1.Controls.Add(Me.txtBorrowCount)
Me.GroupBox1.Controls.Add(Me.Label9)
Me.GroupBox1.Controls.Add(Me.Label10)
Me.GroupBox1.Controls.Add(Me.cmbSex)
Me.GroupBox1.Controls.Add(Me.cmbType)
Me.GroupBox1.Controls.Add(Me.cmbAddTime)
Me.GroupBox1.Location = New System.Drawing.Point(16, 16)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(440, 288)
Me.GroupBox1.TabIndex = 0
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "讀者信息"
'
'mcdAddTime
'
Me.mcdAddTime.Location = New System.Drawing.Point(168, 136)
Me.mcdAddTime.Name = "mcdAddTime"
Me.mcdAddTime.TabIndex = 4
Me.mcdAddTime.Visible = False
'
'txtReaderName
'
Me.txtReaderName.Location = New System.Drawing.Point(80, 73)
Me.txtReaderName.Name = "txtReaderName"
Me.txtReaderName.TabIndex = 2
Me.txtReaderName.Text = ""
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(16, 73)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(56, 24)
Me.Label1.TabIndex = 0
Me.Label1.Text = "姓名"
'
'txtReaderId
'
Me.txtReaderId.Location = New System.Drawing.Point(80, 32)
Me.txtReaderId.Name = "txtReaderId"
Me.txtReaderId.TabIndex = 2
Me.txtReaderId.Text = ""
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(16, 32)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(56, 24)
Me.Label2.TabIndex = 0
Me.Label2.Text = "學號"
'
'Label3
'
Me.Label3.Location = New System.Drawing.Point(16, 114)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(56, 24)
Me.Label3.TabIndex = 0
Me.Label3.Text = "性別"
'
'Label4
'
Me.Label4.Location = New System.Drawing.Point(16, 155)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(56, 24)
Me.Label4.TabIndex = 0
Me.Label4.Text = "類別"
'
'Label5
'
Me.Label5.Location = New System.Drawing.Point(16, 196)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(56, 24)
Me.Label5.TabIndex = 0
Me.Label5.Text = "宿舍"
'
'txtAddress
'
Me.txtAddress.Location = New System.Drawing.Point(80, 196)
Me.txtAddress.Name = "txtAddress"
Me.txtAddress.Size = New System.Drawing.Size(168, 21)
Me.txtAddress.TabIndex = 2
Me.txtAddress.Text = ""
'
'txtDepartment
'
Me.txtDepartment.Location = New System.Drawing.Point(80, 235)
Me.txtDepartment.Name = "txtDepartment"
Me.txtDepartment.Size = New System.Drawing.Size(168, 21)
Me.txtDepartment.TabIndex = 2
Me.txtDepartment.Text = ""
'
'Label6
'
Me.Label6.Location = New System.Drawing.Point(16, 235)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(56, 24)
Me.Label6.TabIndex = 0
Me.Label6.Text = "系別"
'
'Label7
'
Me.Label7.Location = New System.Drawing.Point(200, 32)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(56, 24)
Me.Label7.TabIndex = 0
Me.Label7.Text = "借書次數"
'
'txtTelephone
'
Me.txtTelephone.Location = New System.Drawing.Point(264, 73)
Me.txtTelephone.Name = "txtTelephone"
Me.txtTelephone.Size = New System.Drawing.Size(160, 21)
Me.txtTelephone.TabIndex = 2
Me.txtTelephone.Text = ""
'
'Label8
'
Me.Label8.Location = New System.Drawing.Point(200, 73)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(56, 24)
Me.Label8.TabIndex = 0
Me.Label8.Text = "聯系電話"
'
'txtDemo
'
Me.txtDemo.Location = New System.Drawing.Point(264, 155)
Me.txtDemo.Multiline = True
Me.txtDemo.Name = "txtDemo"
Me.txtDemo.Size = New System.Drawing.Size(160, 101)
Me.txtDemo.TabIndex = 2
Me.txtDemo.Text = ""
'
'txtBorrowCount
'
Me.txtBorrowCount.Location = New System.Drawing.Point(264, 32)
Me.txtBorrowCount.Name = "txtBorrowCount"
Me.txtBorrowCount.Size = New System.Drawing.Size(160, 21)
Me.txtBorrowCount.TabIndex = 2
Me.txtBorrowCount.Text = ""
'
'Label9
'
Me.Label9.Location = New System.Drawing.Point(200, 114)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(56, 24)
Me.Label9.TabIndex = 0
Me.Label9.Text = "登記日期"
'
'Label10
'
Me.Label10.Location = New System.Drawing.Point(200, 155)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(56, 24)
Me.Label10.TabIndex = 0
Me.Label10.Text = "備注"
'
'cmbSex
'
Me.cmbSex.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cmbSex.Items.AddRange(New Object() {"男", "女"})
Me.cmbSex.Location = New System.Drawing.Point(80, 114)
Me.cmbSex.Name = "cmbSex"
Me.cmbSex.Size = New System.Drawing.Size(100, 20)
Me.cmbSex.TabIndex = 3
'
'cmbType
'
Me.cmbType.Location = New System.Drawing.Point(80, 155)
Me.cmbType.Name = "cmbType"
Me.cmbType.Size = New System.Drawing.Size(100, 20)
Me.cmbType.TabIndex = 3
'
'cmbAddTime
'
Me.cmbAddTime.Location = New System.Drawing.Point(264, 114)
Me.cmbAddTime.Name = "cmbAddTime"
Me.cmbAddTime.Size = New System.Drawing.Size(160, 20)
Me.cmbAddTime.TabIndex = 3
'
'btnSave
'
Me.btnSave.Location = New System.Drawing.Point(16, 176)
Me.btnSave.Name = "btnSave"
Me.btnSave.Size = New System.Drawing.Size(64, 32)
Me.btnSave.TabIndex = 1
Me.btnSave.Text = "保存"
'
'btnModify
'
Me.btnModify.Location = New System.Drawing.Point(104, 176)
Me.btnModify.Name = "btnModify"
Me.btnModify.Size = New System.Drawing.Size(64, 32)
Me.btnModify.TabIndex = 1
Me.btnModify.Text = "修改"
'
'btnDelete
'
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -