Множественный выбор на WinForms

Если вы хотите получить только один ответ из группы, то вам лучше всего подойдет элемент управления RadioButton, или вы можете использовать ComboBox, если у вас будет много вариантов. Чтобы установить значение по умолчанию, просто добавьте элемент в коллекцию ComboBox и установите SelectedIndex или SelectedItem для этого элемента.

В зависимости от того, сколько вариантов вы рассматриваете, вы можете использовать ListBox со свойством SelectionMode, установленным в MultiSimple, если это будет множественный выбор, или вы можете использовать элемент управления CheckBox.

Вы должны быть в состоянии просто установить свойство ComboBox.SelectedIndex с тем, что вы хотите, чтобы значение по умолчанию было.

http://msdn.microsoft.com/en-us/library/system.windows.forms.combobox.selectedindex.aspx

Используйте свойство ComboBox.SelectedItem или SelectedIndex после вставки элементов, чтобы выбрать элемент по умолчанию.

Вы также можете рассмотреть возможность использования элемента управления RadioButton для принудительного выбора одного параметра.

Вы можете использовать ComboBox со свойством DropDownStyle , установленным в DropDownList и SelectedIndex в 0 (или каков бы ни был элемент по умолчанию). Это заставит всегда иметь выбранный элемент из списка. Если вы забудете это сделать, пользователь может просто ввести что - то еще в поле редактирования, что будет плохо :)

Если вы даете пользователю небольшой список вариантов, то придерживайтесь переключателей. Тем не менее, если вы хотите использовать поле со списком для динамических или длинных списков. Установите стиль на DropDownList.

private sub populateList( items as List(of UserChoices))
   dim choices as UserChoices
   dim defaultChoice as UserChoices 

   for each choice in items
      cboList.items.add(choice)
      '-- you could do user specific check or base it on some other 
      '---- setting to find the default choice here
      if choice.state = _user.State or choice.state = _settings.defaultState then 
          defaultChoice = choice
      end if 
   next 
   '-- you chould select the first one
   if cboList.items.count > 0 then
      cboList.SelectedItem = cboList.item(0)
   end if 

   '-- continuation of hte default choice
   cboList.SelectedItem = defaultChoice

end sub