Dim s As String = e.Form.Controls("TextBox1").textIf s = "0" Then e.Form.Controls("DateTimePicker1").Enabled = Falseelse
e.Form.Controls("DateTimePicker1").Enabled = trueEnd If