Private Sub CheckBox1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles CheckBox1.CheckedChanged
If sender.Checked Then
Me.Opacity = 0.8
Else
Me.Opacity = 1
End If
End Sub
Private Sub CheckBox1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles CheckBox1.CheckedChanged
If sender.Checked Then
Me.Opacity = 0.8
Else
Me.Opacity = 1
End If
End Sub
اخى الذى احاول ان اوضح هو اضافة مثل form glass داخل form الرئيسي