This should be easy, but it's not working?? 1

[Turb]

Hi All!
I know this should be easy and I've searched the forums and FAQ to try different configurations, but I cannot get this to work on my Access 2003 form.
Please tell me what I'm doing wrong.

I'm trying to auto-check a check box based on a selection chosen in a combo box.

On my form, I have a combo box (cboCycle) that is based on a table (Cycle_tbl). My check box is (ARR_MCABOPT1).

The table (Cycle_tbl) is small and only consists of two columns (ID and cycle) and two records (ID "1" - cycle "60Hz", ID "2" - cycle "50Hz").

Properties of combo box cboCycle are:
Row Source = Cycle_tbl
Column Count = 2
Bound Column = 2

I placed this as an 'After Update" event on the combo box (cboCycle):

Private Sub cboCycle_AfterUpdate()

   If Me.cboCycle.Column(2) = "50Hz" Then
      Me.ARR_MCABOPT1.Value = True
   Else
      'Do Nothing
   End If
    
End Sub

I've tried changing the cboCycle.Column to (1) and even (0).
I've tried changing the If statement to read Me.cboCycle.Column(2) <> "60Hz" and when that didn't work, again played with the column number.
Still no dice.

Help please!


- Turb

 

[TheAceMan1]

how are ya Turb . . .

Note: [blue]Column Index[/blue] starts at zero (0). If you combo comprises both fields, in the left to right order of ID, Cycle, then your after column 1.

So far the only thing wrong I see is you don't set [blue]ARR_MCABOPT1[/blue] false when 60hz is chosen. try the following instead:

[blue]Private Sub cboCycle_AfterUpdate()
   
   Me!ARR_MCABOPT1 = (Me!cboCycle.Column(1) = "50Hz")
    
End Sub[/blue]

See Ya! . . . . . .

Be sure to see thread181-473997
Also faq181-2886

 

[Turb]

Ace,
Hey thanks!
Worked like a charm.

Pink one for ya'!



- Turb

 

[TheAceMan1]

Turb . . .

In your origional code you just needed to set [blue]ARR_MCABOPT1[/blue] to false:

[blue]   Else
      Me.ARR_MCABOPT1 = False
   End If[/blue]

See Ya! . . . . . .

Be sure to see thread181-473997
Also faq181-2886

 

[Turb]

Ace,
This may seem strange, and I know you say my code works if I add the Me.ARR_MCABOPT1 = False but,
my code:

   If Me.cboCycle.Column(1) = "50Hz" Then
      Me.ARR_MCABOPT1.Value = True
   Else
      Me.ARR_MCABOPT1 = False
   End If

doesn't work on this form (doesn't check the checkbox), but yours does.
Anyway, I just appreciate the help!

Do you know if this same type of code should work on a form based on a query (if the Cycle value is already populated, and then changed using a CBO)?
It doesn't seem to...


- Turb

 

[Turb]

Whoops!
Found the problem.
This:

   If Me.cboCycle.Column(1) = "50Hz" Then
      Me.ARR_MCABOPT1.Value = True
   Else
      Me.ARR_MCABOPT1 = False
   End If

Should be this:

   If Me[b][COLOR=red]![/color][/b]cboCycle.Column(1) = "50Hz" Then
      Me[b][COLOR=red]![/color][/b]ARR_MCABOPT1.Value = True
   Else
      Me[b][COLOR=red]![/color][/b]ARR_MCABOPT1 = False
   End If

Thanks Ace!


- Turb

 

[TheAceMan1]

Turb . . .

[blue]Poetry In Motion![/blue]

See Ya! . . . . . .

Be sure to see thread181-473997
Also faq181-2886