Hi John,
To catch the selected items from a MultiListbox, you'll need a handler on your
OKbutton, that will use the ReadControlValue() to read the selected items from the
MultiListbox.
Dim marrTabs() As String
Sub Dialog
'**Here you fill the names of the open tables into your array marrTabs
Dialog
'...all your controls
Control MultiListBox ID 100
Title From Variable marrTabs
'...other controls
Control OKButton
Handler HandlerDialogUnload
End Sub
Sub HandlerDialogUnload
Dim nItem As Integer
nItem = ReadControlValue(100)
Do While (nItem > 0)
Close Table marrTabs(nItem)
nItem = ReadControlValue(100)
Loop
End Sub
HTH,
Peter Horsb�ll M�ller
GIS Developer
Geographical Information & IT
COWI A/S
Odensevej 95
DK-5260 Odense S.
Denmark
Tel +45 6311 4900
Direct +45 6311 4908
Mob +45 5156 1045
Fax +45 6311 4949
E-mail [EMAIL PROTECTED]
http://www.cowi.dk
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Thursday, May 13, 2004 11:17 PM
To: [EMAIL PROTECTED]
Subject: MI-L Using MultiListBox
I am trying to use a multilistbox to show all open tables so I can select several of
the tables to close. I am having trouble understanding how it will go through the
open tables to see which ones are selected to then close them. Any help would be
appreciated. Can anyone help? TIA
John
---------------------------------------------------------------------
List hosting provided by Directions Magazine | www.directionsmag.com | To unsubscribe,
e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Message number: 11746
