'After update' Event procedure

[sk88]

I have a question (Q1) in my form where if the staff chooses a 'NO' from a drop down menu, two other questions will appear (Q2 AND Q3.

I have this code in 'after update'

 
Private Sub Combo817_AfterUpdate()


   If Me.Combo817.Value = "No" Then
   
   Me.Combo815.Visible = True
   Me.lasttimevisit_Label.Visible = True
   Me.Label820.Visible = True
   Me.Text819.Visible = True
  
  
   Else
   Me.Combo815.Visible = False
   Me.lasttimevisit_Label.Visible = False
   Me.Label820.Visible = False
   Me.Text819.Visible = False
    

   End If

End Sub

everything works fine except if the staff after answer to Q2 AND Q3 realizes that the answer for Q1 should be a YES, whatever the input was done in Q2 and Q3 does not get deleted and save it to my database.



Is there a code for error checking or something where I can insert it here so that if the answer is YES, Q2 AND Q3 is cleared?

[pbaldy]

One of these should work:

Me.Combo815 = Null

Me.Combo815 = ""

You'll find as you get better that giving controls meaningful names is a great help in the long run.

[sk88]

One of these should work:

Me.Combo815 = Null

Me.Combo815 = ""

You'll find as you get better that giving controls meaningful names is a great help in the long run.

Thanks pbaldy!

but it is giving me error

I put tried both of your codes.
I insert it under ELSE IF

Private Sub Combo817_AfterUpdate()


   If Me.Combo817.Value = "No" Then
   
   Me.Combo815.Visible = True
   Me.lasttimevisit_Label.Visible = True
   Me.Label820.Visible = True
   Me.Text819.Visible = True
  
  
   Else
   Me.Combo815.Visible = False
   Me.lasttimevisit_Label.Visible = False
   Me.Label820.Visible = False
   Me.Text819.Visible = False
   Me.Combo815 = Null
   Me.Text819.Visible = Null
    

   End If


End Sub

where did I go wrong?

[pbaldy]

What error do you get? That last line is wrong, as you can't set the visible property to Null.

[sk88]

What error do you get? That last line is wrong, as you can't set the visible property to Null.

it works now!! thanks pbaldy! I removed 'visible' from the line and it works just the way that I have wanted!

[pbaldy]

Happy to help!