Hello,
Try this: create a new form and add a new listbox to it and set your
query as the recordsource for the new listbox in the new form and see
what it displays. If this new listbox still displays 1's, 0's then try
the following:
Create a DAO recordset object and set its source to your query. Then
loop through the recordset in debug mode and see what the recordset
displays
Dim RS As DAO.Recordset
Set RS = CurrentDB.OpenRecordset("Select * From yourQuery)
Do While Not RS.EOF
Debug.print RS!YourYesNofield
RS.MoveNext
Loop
If the recordset displays yes and no then the only other thing I could
suggest is to write a function that explicitly returns yes or no. YOu
can set this function in the query in the yes/no field
Public Function Yes_No(i As Integer) As String
If i = 1 Then Yes_No = "Yes"
If i = 0 Then Yes_No = "No"
End Function
Create a new column in your query and set its source like this
NewColumn=Yes_No(theOldColumn)
And now reference this column in the Listbox.
Rich
*** Sent via Developersdex
http://www.developersdex.com ***