Microsoft
Software
Hardware
Network
Question : Access Multiselect Listbox code
I'm developing a string (StrHeading) of the selected listbox items within the following For loop. I want to put a comma between the item names, but not at the end of the string. (ie. if the choices are Red, Green and Blue, StrHeading will be "Red,Green,Blue".) What do I use for the # of items selected in the code below?
For Each varItem In ctl.ItemsSelected
StrHeading = StrHeading & ctl.ItemData(varItem)
If varItem <
# of items selected
StrHeading = StrHeading & ","
End If
StrInsert = ".......;"
DoCmd.RunSQL StrInsert
Next varItem
Answer : Access Multiselect Listbox code
The simplest way is to just parse the string after you fill it:
If Right(StrHeading, 1) = "," Then StrHeading = Right(StrHeading, Len(StrHeading) - 1)
Random Solutions
Polycom ViewStation EX Network setup
SBS 2008 SharePoint Companyweb Layout Missing
Freeware Firewall software
how can i get a list of client inbox rules through powershell
Change Mailbox Alias
export the sas dataset to create a table in my sql database
Passing a structure from VBA in Excel to a C DLL
Javascript form validation problems
Boot Acer Ferrari 1200 laptop from dvd to upgrade vista to windows 7
Exchange SCR between versions