Dovrebbe essere una cosa del genere

codice:
Private Sub Form_Current()
If Me.txtCampo1.Value > 100 Then
Me.txtCampo2.Enabled = True
Else
Me.txtCampo2.Enabled = False
End If
End Sub

Private Sub txtCampo1_AfterUpdate()
If Me.txtCampo1.Value > 100 Then
Me.txtCampo2.Enabled = True
Else
Me.txtCampo2.Enabled = False
End If
End Sub