Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Opening multiple files
- Thread starter rohitt
- Start date
Hi
You can try to use a ListBox. With a loop and the command DIR you can fill the listbox with the file names. After all you have to do is another loop:
private sub cmdOpen_Click()
dim iCount as integer
if lstfile.selcount=0 then
msgbox "You must select at least one file"
exit sub
end if
for icount = 0 to lstFile.ListCount-1
if lstfile.selected(icount) then
'Open the file....
end if
next icount
end sub Mal'chik![[bigglasses]](/data/assets/smilies/bigglasses.gif "[bigglasses] [bigglasses]")
You can try to use a ListBox. With a loop and the command DIR you can fill the listbox with the file names. After all you have to do is another loop:
private sub cmdOpen_Click()
dim iCount as integer
if lstfile.selcount=0 then
msgbox "You must select at least one file"
exit sub
end if
for icount = 0 to lstFile.ListCount-1
if lstfile.selected(icount) then
'Open the file....
end if
next icount
end sub Mal'chik
- Thread starter
- #3
- Status
