Creating Yes/No field from VBA?

[BobK4UVT]

I'm trying to create a dbBoolean "Yes/No" field for a table in VBA with the CreateField method. I can create a dbBoolean field easily enough, but I can't get it to have a "Yes/No" property. If I create a table normally in Access in design view, I can define a field as Yes/No with a checkbox lookup. Just trying to figure out how to do the same thing from VBA.

Anyone have any tips?

Thanks in advance ... Bob

 

[thornmastr]

A Boolean field is one bit. It is designated as 0 or 1, true or false, yes or no. yes or no is simply an Access construct of one or zero. Your definition of Boolean is as far as you are going to get it to go.

You can use a yes/no format to display yes or no if that is what you need.
Robert Berman
Data Base consultant
Vulcan Software Services
thornmastr@yahoo.com

 

[BobK4UVT]

thornmastr,

I agree with you there. If I create a Yes/No field in normal design view (not from VBA), then by default the look up type is Check Box, which is precisely what I want. But if I do it from VBA, I get a Yes/No field, but the lookup type is Text Box. So I must be missing something.

The sub I use is:


Public Sub CreateBooleanField(FldName As String, Tabl As TableDef, OrdPos As Integer)

Dim Fld As Field

Set Fld = Tabl.CreateField(FldName, dbBoolean)
Fld.OrdinalPosition = OrdPos
Fld.DefaultValue = 0
Tabl.Fields.Append Fld

End Sub

Have I missed something? All I need for it to do now is to have the lookup property as checkBox instead of TextBox.

Many thanks!

Bob

 

[hsitz]

Can't help you with your problem, but just wanted to clarify that Yes/No fields in Access have a true value of -1 and a false value of 0, _not_ 1 for true and 0 for false. I assume it stays the same if the field is defined as boolean and doesn't formally get registered as a Yes/No data type.