I am building a data base for a reality company and they need to select
multiple appliances that are included with the sale, how do I create such a
list in access?
fredg said:I am building a data base for a reality company and they need to select
multiple appliances that are included with the sale, how do I create such
a
list in access?
In a drop box? I assume you mean a Combo Box.
You can't.
Use a List box on a form .
Set it's MultiSelect property to Extended.
You'll also need code in the List Box Exit event to return all the
selected values.
Private Sub lstAppliances_Exit(Cancel As Integer)
Dim strString As String
Dim varItem As Variant
For Each varItem In lstAFriend.ItemsSelected
strString = strString & lstAFriend.ItemData(varItem) & ", "
Next varItem
[SomeControlOnForm] = strString
End Sub
Freezer; Stove; Dish Washer;
Duane Hookom said:I think FUNPIX needs to create a junction table of Sales and appliances. At
this time (through version 2003) this is best implemented using a subform on
the "Sale" form.
The junction table would include the primary keys from the Sale table and
the Appliance table.
--
Duane Hookom
MS Access MVP
fredg said:I am building a data base for a reality company and they need to select
multiple appliances that are included with the sale, how do I create such
a
list in access?
In a drop box? I assume you mean a Combo Box.
You can't.
Use a List box on a form .
Set it's MultiSelect property to Extended.
You'll also need code in the List Box Exit event to return all the
selected values.
Private Sub lstAppliances_Exit(Cancel As Integer)
Dim strString As String
Dim varItem As Variant
For Each varItem In lstAFriend.ItemsSelected
strString = strString & lstAFriend.ItemData(varItem) & ", "
Next varItem
[SomeControlOnForm] = strString
End Sub
Freezer; Stove; Dish Washer;
FUNPIX said:I appreciate your help but I failed to mentioned that I have never wrote a
data base ever, so the additional coding is very confusing to me. Can you
suggest any good books or sites that may aid in my understanding? Thanks