trackbar ekledikten sonra trackbar a çift tıklayarak şu kodu yazalım
PublicClass Form1
PrivateSub TrackBar1_ValueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TrackBar1.ValueChanged
Me.Opacity = TrackBar1.Value / 5
EndSub
EndClass