I have a problem with inserting a multiple selection option into my Inputbox.

IDEA:
First the user chooses an excel file which he wants to open and then the sheet he wants to be read.

I can manage everything else except making the sheet selection a multiple option one.


At the moment the name of the wanted Excel sheet is typed into the text field in the inputbox. But I want the textfield to be a dropdownlist which would be populated with this:
Code:
 With ComboBox1
                For i As Integer = 1 To XL_WB.Worksheets.Count
                    Dim nimet As Excel.Worksheet = XL_WB.Worksheets(i)
                    .Items.Add(nimet.Name)
                Next
            End With
(XL_WB is my Excel.Workbook)


So, does anyone have an idea or a syntax ready for how to create an Inputbox with Textfield --> ComboBox ??