ADOX Help - Column Properties

I am creating a temp table using the following code:

Code:Dim cat as ADOX.Catalog Dim tbl as ADOX.Table Set cat = New ADOX.Catalog cat.ActiveConnection = CurrentProject.Connection Set tbl = New ADOX.TableWith tbl.Name = "tblContactsTemp".ParentCatalog = cat.Columns.Append "CustomerID", adInteger.Columns.Append "LastName", adWChar, 50End With cat.Tables.Append tbl

This creates the table almost exactly as I want it. The problem is that this creates all columns as required. I have read through all the Microsoft Knowledge Base items about ADOX that I can find, and I have not discovered how to set a columns properties to NOT Required. Does anyone have experience with how to change the properties for this?

I have been able to change one property, the AutoIncrement, on integer types, using:Code:.Columns("CustomerID").Properties("AutoIncrement") = Trueincluded after that column's append in the example above, but attempting something similar with
Code:.Columns("LastName").Properties("Required") = Falsedoes not work.

Any help much appreciated!!!

Thanks,
John