Dobrý den, programuji terč a potřebuji ho propojit s TrackBarem, aby se mi při posouvání zvětšoval. Nevím jaký kód mám napsat k TrackBaru. Terč mám. Děkuji.


Dim t As Graphics

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

t = PictureBox1.CreateGraphics

t.FillEllipse(Brushes.Black, 80, 80, 200, 200)
t.FillEllipse(Brushes.Green, 90, 90, 180, 180)
...
End Sub