Class ListBox

csharp
[C#]

//Create a new Workbook.
Workbook workbook = new Workbook();

//Get the first worksheet.
Worksheet sheet = workbook.Worksheets[0];

//Get the worksheet cells collection.
Cells cells = sheet.Cells;

//Input a value.
cells["B3"].PutValue("Choose Dept:");

//Set it bold.
Style style = cells["B3"].GetStyle();
style.Font.IsBold = true;
cells["B3"].SetStyle(style);

//Input some values that denote the input range
//for the list box.
cells["A2"].PutValue("Sales");
cells["A3"].PutValue("Finance");
cells["A4"].PutValue("MIS");
cells["A5"].PutValue("R&D");
cells["A6"].PutValue("Marketing");
cells["A7"].PutValue("HRA");

//Add a new list box.
ListBox listBox = sheet.Shapes.AddListBox(2, 0, 3, 0, 122, 100);

//Set the placement type.
listBox.Placement = PlacementType.FreeFloating;

//Set the linked cell.
listBox.LinkedCell = "A1";

//Set the input range.
listBox.InputRange = "A2:A7";

//Set the selection style.
listBox.SelectionType = SelectionType.Single;

//Set the list box with 3-D shading.
listBox.Shadow = true;

//Saves the file.
workbook.Save(@"tstlistbox.xls");

'Create a new Workbook.
Dim workbook As Aspose.Cells.Workbook = New Aspose.Cells.Workbook()

'Get the first worksheet.
Dim sheet As Worksheet = workbook.Worksheets(0)

'Get the worksheet cells collection.
Dim cells As Cells = sheet.Cells

'Input a value.
cells("B3").PutValue("Choose Dept:")

'Set it bold.
Dim style As Style = cells("B3").GetStyle()
style.Font.IsBold = True
cells("B3").SetStyle(style)

'Input some values that denote the input range
'for the list box.
cells("A2").PutValue("Sales")
cells("A3").PutValue("Finance")
cells("A4").PutValue("MIS")
cells("A5").PutValue("R&D")
cells("A6").PutValue("Marketing")
cells("A7").PutValue("HRA")

'Add a new list box.
Dim listBox As Aspose.Cells.ListBox = sheet.Shapes.AddListBox(2, 0, 3, 0, 122, 100)

'Set the placement type.
listBox.Placement = PlacementType.FreeFloating

'Set the linked cell.
listBox.LinkedCell = "A1"

'Set the input range.
listBox.InputRange = "A2:A7"

'Set the selection tyle.
listBox.SelectionType = SelectionType.Single

'Set the list box with 3-D shading.
listBox.Shadow = True

'Saves the file.
workbook.Save("tstlistbox.xls")