Hi, All:
Can I use Array column in Access? I have a variable which will have multiple vaules, I want to store this in one column, anyone have a good idea?
thanks

The short answer is 'no'.

The long answer is that multivalued fields are a bad idea in relational database design. In db normalization nomenclature they are called "repeating groups", and a table that contains repeating groups is not even in first normal form (1NF). The definition of first normal form is, essentially, "no tables in your schema contain repeating groups." Ideally, all of the tables in your db schema should achieve at least 3rd normal form. Normalization aside...

The way to handle your multivalued field (e.g., multiple telephone numbers) is to remove it from your primary table and place it in a new table that has a one-to-many relationship to your primary table (e.g., Clients). Add a forieng-key field to your new table (many-side of the relationship) that relates to the primary-key field of your primary table.

If you want to list your related multiple values, use a query to bring them together.

Hope that makes some sense.

Bob

Hello reindeerw,
What Bob said was correct, but of course, there are exceptions to every rule.
Without asking your purpose for desiring an array column, I will offer a way to input the values of an array, into a single field.
..assuming this is your question...
Dim x as Integer
Dim sArray as String
For x = 1 to aArray(Ubound)
If x <> aArray(Ubound) Then
sArray = sArray & aArray(x) & "; "
Else
sArray = sArray & aArray(x)
End If
Next x

Me.FieldName = sArray

This will update the immediate form, that has the focus & only one record.

Is this what your looking for?
Hope it helps, good luck!

Hi reindeerw and DBoulos,

My apologies for the detour reindeerw, didn't mean to wander too far a field, and thank you for the code DBoulos. I just tweaked a couple spots.

Dim x As Integer
    Dim sArray As String
    Dim aArray(10) As String

    For x = 1 To UBound(aArray)
        If x <> UBound(aArray) Then
            sArray = sArray & aArray(x) & "; "
        Else
            sArray = sArray & aArray(x)
        End If
    Next x

    Me.FieldName = sArray

Best to all,

Bob