Public Class Form1 Dim disegno As Graphics Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load disegno = Panel1.CreateGraphics() disegno.DrawLine(Pens.Red, 1, 1, 150, 50) End Sub Inserendo lo stesso codice che disegna la linea in un'altra funziona invece funziona. PErchè?
Private Sub Form1_Shown(sender As Object, e As EventArgs) Handles Me.Shown disegno = Panel1.CreateGraphics() disegno.DrawLine(Pens.Red, 1, 1, 150, 50) End Sub