You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

63 lines
2.4 KiB

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmcalendar
Inherits System.Windows.Forms.Form
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<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
'Wird vom Windows Form-Designer benötigt.
Private components As System.ComponentModel.IContainer
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmcalendar))
Me.MonthCalendar1 = New System.Windows.Forms.MonthCalendar()
Me.Button1 = New System.Windows.Forms.Button()
Me.SuspendLayout()
'
'MonthCalendar1
'
Me.MonthCalendar1.Location = New System.Drawing.Point(-1, -1)
Me.MonthCalendar1.Name = "MonthCalendar1"
Me.MonthCalendar1.TabIndex = 1
'
'Button1
'
Me.Button1.Dock = System.Windows.Forms.DockStyle.Bottom
Me.Button1.Location = New System.Drawing.Point(0, 167)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(196, 23)
Me.Button1.TabIndex = 2
Me.Button1.Text = "Übernehmen"
Me.Button1.UseVisualStyleBackColor = True
'
'frmcalendar
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(196, 190)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.MonthCalendar1)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmcalendar"
Me.Text = "Kalender"
Me.ResumeLayout(False)
End Sub
Friend WithEvents MonthCalendar1 As MonthCalendar
Friend WithEvents Button1 As Button
End Class