[AccessD] Listbox item Selected property staying false after clicking an item

I took your advice... AfterUpdate is not a place I want to be checking
.Selected property. Perhaps unless dealing with a multiselect listbox it is
never efficient to use Selected property. But for whatever reason .ListIndex
and I have not gotten along well in the past (he says it's me).

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust
Sent: Thursday, August 11, 2011 5:28 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Listbox item Selected property staying false after
clicking an item

Have you tried using the list index to return the selected items?

Charlotte Foust

On Thu, Aug 11, 2011 at 10:12 AM, William Benson (VBACreations.Com) <
vbacreations at gmail.com> wrote:

> I click on n item in a listbox and I can tell I have selected it but
> whenever I test for Selected = true, Access is not reporting the true
state
> of the selected property.
>
> There are column heads.
>
> Any idea why?
>
> Function ActiveReportID() As Long
> Dim i As Long
> Dim Frm As Form
> On Error Resume Next
> Set Frm = Forms("FrmMatchReport")
> If Frm Is Nothing Then
>  ActiveReportID = 0
>  Exit Function
> End If
>
> With Frm
>  For i = 1 To .Controls("cboReportHeader").ListCount - 1
>    If .Controls("cboReportHeader").Selected(i) Then 'Seems always to be
> false even when staring at the control I can tell it's true!
>      ActiveReportID = .Controls("cboReportHeader").Column(0, i)
>      Exit Function
>    End If
>  Next
> End With
>
> End Function
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
>
>
> Website: http://www.databaseadvisors.com
>
>
>
-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com