Checkbox Code question

[susanmgarrett]

I use the following code underlying a combo box search form for a database:

Private Sub OK_Click()
Dim Where As String
Const ObType = "Form"
Where = Where & MakeSQL(1, "completeddate", 8)
Where = Where & MakeSQL(2, "MDEissue", ?)
Where = Where & MakeSQL(3, "library", 10)
On Error GoTo OKCApplyError
If Where <> "" Then
Where = Mid(Where, 6)
DoCmd.OpenForm "Form - Issue entry", , , Where
Else
DoCmd.OpenForm "Form - Issue entry"
End If

I have never used a checkbox (yes/no) with this form before and have no idea what to put in place of the questionmark on that red line.

I know that 7 is numeric, 8 indicates a date, and 10 indicates text.

Does anyone have a list of those codes?

Also, in creating the row source for my combo box, what items would work with a checkbox? I am assuming "All;Yes;No" would work as valid selectors, but could "All;True;False" work as well?

Thanks!

Susan

 

[Pat Hartman]

Here's the list.

TypeCode TypeDesc
1 Boolean
2 Byte
3 Integer
4 Long
5 Currency
6 Single
7 Double
8 Date/Time
9 Binary
10 Text
11 LongBinary
12 Memo
15 GUID
16 BigInt
17 VarBinary
18 Char
19 Numeric
20 Decimal
21 Float
22 Time
23 TimeStamp

 

[susanmgarrett]

Thank you!

That was exactly what I was looking for!

Thanks!