Public Sub Form_Open()
Dim hControl As Control = Me["TextBox1"]
hControl.Enabled = False
If Not hControl.Enabled Then
hControl.Foreground = Color.LightForeground
Else
hControl.Foreground = Color.TextForeground
Endif
hControl.Background = Color.TextBackground
TextBox1.text = "PIPPO"
End