<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Form1
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 窗体设计器所必需的
Private components As System.ComponentModel.IContainer
*注意: 以下过程是 Windows 窗体设计器所必需的
*可以使用 Windows 窗体设计器修改它。
*不要使用代码编辑器修改它。
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.lstShow1 = New System.Windows.Forms.ListBox
Me.lstShow2 = New System.Windows.Forms.ListBox
Me.Delete = New System.Windows.Forms.Button
Me.Delete2 = New System.Windows.Forms.Button
Me.SuspendLayout()
*
*lstShow1
*
Me.lstShow1.FormattingEnabled = True
Me.lstShow1.ItemHeight = 12
Me.lstShow1.Location = New System.Drawing.Point(12, 21)
Me.lstShow1.Name = "lstShow1"
Me.lstShow1.Size = New System.Drawing.Size(120, 196)
Me.lstShow1.TabIndex = 1
*
*lstShow2
*
Me.lstShow2.FormattingEnabled = True
Me.lstShow2.ItemHeight = 12
Me.lstShow2.Location = New System.Drawing.Point(152, 21)
Me.lstShow2.Name = "lstShow2"
Me.lstShow2.Size = New System.Drawing.Size(120, 196)
Me.lstShow2.TabIndex = 2
*
*Delete
*
Me.Delete.Location = New System.Drawing.Point(21, 223)
Me.Delete.Name = "Delete"
Me.Delete.Size = New System.Drawing.Size(75, 23)
Me.Delete.TabIndex = 3
Me.Delete.Text = "Delete1"
Me.Delete.UseVisualStyleBackColor = True
*
*Delete2
*
Me.Delete2.Location = New System.Drawing.Point(152, 223)
Me.Delete2.Name = "Delete2"
Me.Delete2.Size = New System.Drawing.Size(75, 23)
Me.Delete2.TabIndex = 4
Me.Delete2.Text = "Delete2"
Me.Delete2.UseVisualStyleBackColor = True
*
*Form1
*
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(284, 262)
Me.Controls.Add(Me.Delete2)
Me.Controls.Add(Me.Delete)
Me.Controls.Add(Me.lstShow2)
Me.Controls.Add(Me.lstShow1)
Me.Name = "Form1"
Me.Text = "Form1"
Me.ResumeLayout(False)
End Sub
Friend WithEvents lstShow1 As System.Windows.Forms.ListBox
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As Integer
For i = 1 To 100
lstShow1.Items.Add(i)
lstShow2.Items.Add(i.ToString())
Next i
End Sub
Friend WithEvents lstShow2 As System.Windows.Forms.ListBox
Friend WithEvents Delete As System.Windows.Forms.Button
Friend WithEvents Delete2 As System.Windows.Forms.Button
End Class