Bill said:
Go down to the post labeled "Help me resolve this."
Nobody has got it working yet.
Bill, you need a reference to Form1. This will work.
'-- Put this in your opacity form
Dim trans As Form1
Private Sub TrackBar1_Scroll(ByVal sender As System.Object, ByVal e
As System.EventArgs) Handles tb.Scroll
If tb.Value = 0 Then trans.Opacity = 0.1
If tb.Value = 1 Then trans.Opacity = 0.2
If tb.Value = 2 Then trans.Opacity = 0.3
If tb.Value = 3 Then trans.Opacity = 0.4
If tb.Value = 4 Then trans.Opacity = 0.5
If tb.Value = 5 Then trans.Opacity = 0.6
If tb.Value = 6 Then trans.Opacity = 0.7
If tb.Value = 7 Then trans.Opacity = 0.8
If tb.Value = 8 Then trans.Opacity = 0.9
If tb.Value = 9 Then trans.Opacity = 1
End Sub
Public WriteOnly Property Control() As Form1
Set(ByVal Value As Form1)
trans = Value
End Set
End Property
--Put this in your Form1 click event
Dim frm As New Form2()
frm.Control = Me
frm.ShowDialog()
