123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167 |
- <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
- Partial Class 醫師下診紀錄
- Inherits System.Windows.Forms.Form
-
- 'Form 覆寫 Dispose 以清除元件清單。
- <System.Diagnostics.DebuggerNonUserCode()>
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- '為 Windows Form 設計工具的必要項
- Private components As System.ComponentModel.IContainer
-
- '注意: 以下為 Windows Form 設計工具所需的程序
- '可以使用 Windows Form 設計工具進行修改。
- '請勿使用程式碼編輯器進行修改。
- <System.Diagnostics.DebuggerStepThrough()>
- Private Sub InitializeComponent()
- Me.月清單_DGV = New System.Windows.Forms.DataGridView()
- Me.月份_cb = New System.Windows.Forms.ComboBox()
- Me.年份_cb = New System.Windows.Forms.ComboBox()
- Me.Label16 = New System.Windows.Forms.Label()
- Me.Label17 = New System.Windows.Forms.Label()
- Me.時間_dtp = New System.Windows.Forms.DateTimePicker()
- Me.Label1 = New System.Windows.Forms.Label()
- Me.修改該筆資料_bt = New System.Windows.Forms.Button()
- Me.刪除該筆資料_bt = New System.Windows.Forms.Button()
- CType(Me.月清單_DGV, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- '月清單_DGV
- '
- Me.月清單_DGV.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
- Or System.Windows.Forms.AnchorStyles.Left) _
- Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
- Me.月清單_DGV.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
- Me.月清單_DGV.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
- Me.月清單_DGV.Location = New System.Drawing.Point(12, 58)
- Me.月清單_DGV.Name = "月清單_DGV"
- Me.月清單_DGV.RowHeadersWidth = 5
- Me.月清單_DGV.RowTemplate.Height = 24
- Me.月清單_DGV.Size = New System.Drawing.Size(364, 537)
- Me.月清單_DGV.TabIndex = 768
- '
- '月份_cb
- '
- Me.月份_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.月份_cb.FormattingEnabled = True
- Me.月份_cb.Items.AddRange(New Object() {"01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12"})
- Me.月份_cb.Location = New System.Drawing.Point(169, 4)
- Me.月份_cb.Name = "月份_cb"
- Me.月份_cb.Size = New System.Drawing.Size(71, 24)
- Me.月份_cb.TabIndex = 772
- '
- '年份_cb
- '
- Me.年份_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.年份_cb.FormattingEnabled = True
- Me.年份_cb.Items.AddRange(New Object() {"2019", "2020", "2021", "2022", "2023", "2024", "2025", "2026", "2027", "2028", "2029", "2030"})
- Me.年份_cb.Location = New System.Drawing.Point(54, 4)
- Me.年份_cb.Name = "年份_cb"
- Me.年份_cb.Size = New System.Drawing.Size(71, 24)
- Me.年份_cb.TabIndex = 771
- '
- 'Label16
- '
- Me.Label16.AutoSize = True
- Me.Label16.Location = New System.Drawing.Point(131, 7)
- Me.Label16.Name = "Label16"
- Me.Label16.Size = New System.Drawing.Size(32, 16)
- Me.Label16.TabIndex = 770
- Me.Label16.Text = "月份"
- '
- 'Label17
- '
- Me.Label17.AutoSize = True
- Me.Label17.Location = New System.Drawing.Point(16, 7)
- Me.Label17.Name = "Label17"
- Me.Label17.Size = New System.Drawing.Size(32, 16)
- Me.Label17.TabIndex = 769
- Me.Label17.Text = "年份"
- '
- '時間_dtp
- '
- Me.時間_dtp.CustomFormat = "yyyy/MM/dd HH:mm:ss"
- Me.時間_dtp.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
- Me.時間_dtp.Format = System.Windows.Forms.DateTimePickerFormat.Custom
- Me.時間_dtp.Location = New System.Drawing.Point(66, 32)
- Me.時間_dtp.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
- Me.時間_dtp.Name = "時間_dtp"
- Me.時間_dtp.Size = New System.Drawing.Size(174, 23)
- Me.時間_dtp.TabIndex = 788
- '
- 'Label1
- '
- Me.Label1.AutoSize = True
- Me.Label1.Location = New System.Drawing.Point(4, 36)
- Me.Label1.Name = "Label1"
- Me.Label1.Size = New System.Drawing.Size(56, 16)
- Me.Label1.TabIndex = 789
- Me.Label1.Text = "下診時間"
- '
- '修改該筆資料_bt
- '
- Me.修改該筆資料_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
- Me.修改該筆資料_bt.ForeColor = System.Drawing.Color.Green
- Me.修改該筆資料_bt.Location = New System.Drawing.Point(246, 4)
- Me.修改該筆資料_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
- Me.修改該筆資料_bt.Name = "修改該筆資料_bt"
- Me.修改該筆資料_bt.Size = New System.Drawing.Size(66, 51)
- Me.修改該筆資料_bt.TabIndex = 791
- Me.修改該筆資料_bt.Text = "修改該筆資料"
- Me.修改該筆資料_bt.UseVisualStyleBackColor = True
- '
- '刪除該筆資料_bt
- '
- Me.刪除該筆資料_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
- Me.刪除該筆資料_bt.ForeColor = System.Drawing.Color.Red
- Me.刪除該筆資料_bt.Location = New System.Drawing.Point(318, 4)
- Me.刪除該筆資料_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
- Me.刪除該筆資料_bt.Name = "刪除該筆資料_bt"
- Me.刪除該筆資料_bt.Size = New System.Drawing.Size(58, 51)
- Me.刪除該筆資料_bt.TabIndex = 790
- Me.刪除該筆資料_bt.Text = "刪除該筆資料"
- Me.刪除該筆資料_bt.UseVisualStyleBackColor = True
- '
- '醫師下診紀錄
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(388, 600)
- Me.Controls.Add(Me.修改該筆資料_bt)
- Me.Controls.Add(Me.刪除該筆資料_bt)
- Me.Controls.Add(Me.Label1)
- Me.Controls.Add(Me.時間_dtp)
- Me.Controls.Add(Me.月份_cb)
- Me.Controls.Add(Me.年份_cb)
- Me.Controls.Add(Me.Label16)
- Me.Controls.Add(Me.Label17)
- Me.Controls.Add(Me.月清單_DGV)
- Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
- Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
- Me.Name = "醫師下診紀錄"
- Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
- Me.Text = "醫師下診紀錄"
- CType(Me.月清單_DGV, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
- Me.PerformLayout()
-
- End Sub
-
- Friend WithEvents 月清單_DGV As DataGridView
- Friend WithEvents 月份_cb As ComboBox
- Friend WithEvents 年份_cb As ComboBox
- Friend WithEvents Label16 As Label
- Friend WithEvents Label17 As Label
- Friend WithEvents 時間_dtp As DateTimePicker
- Friend WithEvents Label1 As Label
- Friend WithEvents 修改該筆資料_bt As Button
- Friend WithEvents 刪除該筆資料_bt As Button
- End Class
|