197 lines
11 KiB
VB.net
197 lines
11 KiB
VB.net
Imports System.Windows.Forms
|
|
|
|
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
|
Partial Class usrCntlMessenger_Umfrage
|
|
Inherits System.Windows.Forms.UserControl
|
|
|
|
'UserControl ü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()
|
|
Me.components = New System.ComponentModel.Container()
|
|
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
|
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
|
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
|
Me.pnl = New System.Windows.Forms.Panel()
|
|
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
|
|
Me.Label4 = New System.Windows.Forms.Label()
|
|
Me.Label3 = New System.Windows.Forms.Label()
|
|
Me.DataGridView2 = New System.Windows.Forms.DataGridView()
|
|
Me.MyRichTextBox1 = New VERAG_PROG_ALLGEMEIN.MyRichTextBox()
|
|
Me.DataGridViewTextBoxColumn7 = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
|
Me.DataGridViewTextBoxColumn8 = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
|
Me.DataGridViewTextBoxColumn9 = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
|
Me.pnl.SuspendLayout()
|
|
CType(Me.DataGridView2, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
Me.SuspendLayout()
|
|
'
|
|
'pnl
|
|
'
|
|
Me.pnl.Controls.Add(Me.MyRichTextBox1)
|
|
Me.pnl.Controls.Add(Me.DataGridView2)
|
|
Me.pnl.Controls.Add(Me.Label4)
|
|
Me.pnl.Controls.Add(Me.Label3)
|
|
Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill
|
|
Me.pnl.Location = New System.Drawing.Point(0, 0)
|
|
Me.pnl.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
|
Me.pnl.Name = "pnl"
|
|
Me.pnl.Size = New System.Drawing.Size(840, 778)
|
|
Me.pnl.TabIndex = 0
|
|
'
|
|
'Timer1
|
|
'
|
|
Me.Timer1.Interval = 2000
|
|
'
|
|
'Label4
|
|
'
|
|
Me.Label4.AutoSize = True
|
|
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
|
|
Me.Label4.Location = New System.Drawing.Point(28, 257)
|
|
Me.Label4.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
|
Me.Label4.Name = "Label4"
|
|
Me.Label4.Size = New System.Drawing.Size(109, 29)
|
|
Me.Label4.TabIndex = 12
|
|
Me.Label4.Text = "Auswahl:"
|
|
'
|
|
'Label3
|
|
'
|
|
Me.Label3.AutoSize = True
|
|
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
|
|
Me.Label3.Location = New System.Drawing.Point(28, 22)
|
|
Me.Label3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
|
|
Me.Label3.Name = "Label3"
|
|
Me.Label3.Size = New System.Drawing.Size(268, 29)
|
|
Me.Label3.TabIndex = 11
|
|
Me.Label3.Text = "Umfrage-Beschreibung:"
|
|
'
|
|
'DataGridView2
|
|
'
|
|
Me.DataGridView2.AllowUserToAddRows = False
|
|
Me.DataGridView2.AllowUserToDeleteRows = False
|
|
Me.DataGridView2.AllowUserToResizeColumns = False
|
|
Me.DataGridView2.AllowUserToResizeRows = False
|
|
Me.DataGridView2.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.DataGridView2.BackgroundColor = System.Drawing.Color.White
|
|
DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
|
DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Control
|
|
DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
|
DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.WindowText
|
|
DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
|
DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
|
DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
|
Me.DataGridView2.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle1
|
|
Me.DataGridView2.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
|
Me.DataGridView2.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.DataGridViewTextBoxColumn7, Me.DataGridViewTextBoxColumn8, Me.DataGridViewTextBoxColumn9})
|
|
DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
|
DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Window
|
|
DataGridViewCellStyle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
|
DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.ControlText
|
|
DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
|
DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
|
DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
|
Me.DataGridView2.DefaultCellStyle = DataGridViewCellStyle2
|
|
Me.DataGridView2.Location = New System.Drawing.Point(33, 291)
|
|
Me.DataGridView2.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
|
Me.DataGridView2.Name = "DataGridView2"
|
|
Me.DataGridView2.ReadOnly = True
|
|
DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
|
DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Control
|
|
DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
|
DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.WindowText
|
|
DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
|
DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
|
DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
|
Me.DataGridView2.RowHeadersDefaultCellStyle = DataGridViewCellStyle3
|
|
Me.DataGridView2.RowHeadersVisible = False
|
|
Me.DataGridView2.RowHeadersWidth = 62
|
|
Me.DataGridView2.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
|
Me.DataGridView2.Size = New System.Drawing.Size(773, 384)
|
|
Me.DataGridView2.TabIndex = 14
|
|
'
|
|
'MyRichTextBox1
|
|
'
|
|
Me.MyRichTextBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
|
|
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
|
Me.MyRichTextBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
|
|
Me.MyRichTextBox1.Location = New System.Drawing.Point(33, 55)
|
|
Me.MyRichTextBox1.MaxLineLength = -1
|
|
Me.MyRichTextBox1.MaxLines_Warning = ""
|
|
Me.MyRichTextBox1.MaxLines_Warning_Label = Nothing
|
|
Me.MyRichTextBox1.Name = "MyRichTextBox1"
|
|
Me.MyRichTextBox1.Size = New System.Drawing.Size(773, 181)
|
|
Me.MyRichTextBox1.TabIndex = 15
|
|
Me.MyRichTextBox1.Text = ""
|
|
'
|
|
'DataGridViewTextBoxColumn7
|
|
'
|
|
Me.DataGridViewTextBoxColumn7.HeaderText = "Column1"
|
|
Me.DataGridViewTextBoxColumn7.MinimumWidth = 8
|
|
Me.DataGridViewTextBoxColumn7.Name = "DataGridViewTextBoxColumn7"
|
|
Me.DataGridViewTextBoxColumn7.ReadOnly = True
|
|
Me.DataGridViewTextBoxColumn7.Visible = False
|
|
Me.DataGridViewTextBoxColumn7.Width = 150
|
|
'
|
|
'DataGridViewTextBoxColumn8
|
|
'
|
|
Me.DataGridViewTextBoxColumn8.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.None
|
|
Me.DataGridViewTextBoxColumn8.HeaderText = "Wert"
|
|
Me.DataGridViewTextBoxColumn8.MaxInputLength = 50
|
|
Me.DataGridViewTextBoxColumn8.MinimumWidth = 8
|
|
Me.DataGridViewTextBoxColumn8.Name = "DataGridViewTextBoxColumn8"
|
|
Me.DataGridViewTextBoxColumn8.ReadOnly = True
|
|
Me.DataGridViewTextBoxColumn8.Width = 200
|
|
'
|
|
'DataGridViewTextBoxColumn9
|
|
'
|
|
Me.DataGridViewTextBoxColumn9.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
|
|
Me.DataGridViewTextBoxColumn9.HeaderText = "Beschreibung"
|
|
Me.DataGridViewTextBoxColumn9.MaxInputLength = 500
|
|
Me.DataGridViewTextBoxColumn9.MinimumWidth = 8
|
|
Me.DataGridViewTextBoxColumn9.Name = "DataGridViewTextBoxColumn9"
|
|
Me.DataGridViewTextBoxColumn9.ReadOnly = True
|
|
'
|
|
'usrCntlMessenger_Umfrage
|
|
'
|
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(9.0!, 20.0!)
|
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
|
Me.BackColor = System.Drawing.Color.White
|
|
Me.Controls.Add(Me.pnl)
|
|
Me.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
|
Me.Name = "usrCntlMessenger_Umfrage"
|
|
Me.Size = New System.Drawing.Size(840, 778)
|
|
Me.pnl.ResumeLayout(False)
|
|
Me.pnl.PerformLayout()
|
|
CType(Me.DataGridView2, System.ComponentModel.ISupportInitialize).EndInit()
|
|
Me.ResumeLayout(False)
|
|
|
|
End Sub
|
|
|
|
Friend WithEvents pnl As Panel
|
|
Friend WithEvents Timer1 As Timer
|
|
Friend WithEvents Label4 As Label
|
|
Friend WithEvents Label3 As Label
|
|
Friend WithEvents MyRichTextBox1 As MyRichTextBox
|
|
Friend WithEvents DataGridView2 As DataGridView
|
|
Friend WithEvents DataGridViewTextBoxColumn7 As DataGridViewTextBoxColumn
|
|
Friend WithEvents DataGridViewTextBoxColumn8 As DataGridViewTextBoxColumn
|
|
Friend WithEvents DataGridViewTextBoxColumn9 As DataGridViewTextBoxColumn
|
|
End Class
|