单击事件,调用的过程: Private Sub form2show() Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red) Dim formGraphics As System.Drawing.Graphics formGraphics = Form2.Label1.CreateGraphics() For i = 0 To 390 formGraphics.DrawLine(Pens.Red, 0, i * 15, 390, i * 15) Next For i = 0 To 390 formGraphics.DrawLine(Pens.Red, i * 15, 0, i * 15, 390) Next myPen.Dispose() formGraphics.Dispose() Form2.Show() End Sub 只是form2跳出来了,label1原来怎么样,现在还是怎么样