_ Partial Class SelectMulti Inherits System.Windows.Forms.Form 'Form esegue l'override del metodo Dispose per pulire l'elenco dei componenti. _ 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 'Richiesto da Progettazione Windows Form Private components As System.ComponentModel.IContainer 'NOTA: la procedura che segue è richiesta da Progettazione Windows Form 'Può essere modificata in Progettazione Windows Form. 'Non modificarla nell'editor del codice. _ Private Sub InitializeComponent() Me.ListBox1 = New System.Windows.Forms.ListBox() Me.OK_Button = New System.Windows.Forms.Button() Me.SuspendLayout() ' 'ListBox1 ' Me.ListBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.ListBox1.FormattingEnabled = True Me.ListBox1.Location = New System.Drawing.Point(0, 0) Me.ListBox1.Margin = New System.Windows.Forms.Padding(0) Me.ListBox1.Name = "ListBox1" Me.ListBox1.Size = New System.Drawing.Size(98, 108) Me.ListBox1.TabIndex = 1 ' 'OK_Button ' Me.OK_Button.Location = New System.Drawing.Point(23, 109) Me.OK_Button.Name = "OK_Button" Me.OK_Button.Size = New System.Drawing.Size(52, 20) Me.OK_Button.TabIndex = 2 Me.OK_Button.Text = "OK" Me.OK_Button.UseVisualStyleBackColor = True ' 'SelectMulti ' Me.AcceptButton = Me.OK_Button Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None Me.ClientSize = New System.Drawing.Size(104, 131) Me.ControlBox = False Me.Controls.Add(Me.OK_Button) Me.Controls.Add(Me.ListBox1) Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow Me.KeyPreview = True Me.MaximizeBox = False Me.MaximumSize = New System.Drawing.Size(110, 160) Me.MinimizeBox = False Me.MinimumSize = New System.Drawing.Size(110, 160) Me.Name = "SelectMulti" Me.ShowIcon = False Me.ShowInTaskbar = False Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent Me.Text = "MultiSel" Me.ResumeLayout(False) End Sub Friend WithEvents ListBox1 As System.Windows.Forms.ListBox Friend WithEvents OK_Button As System.Windows.Forms.Button End Class