Vb и SQL

[baranich]

Код:

выборкаИзБазыДанных.Source = "EXEC СписокСотрудниковПодразделения " + sНомерПодразделения
    выборкаИзБазыДанных.Open
    indexID = 0
    While Not выборкаИзБазыДанных.EOF
        СтрокаЗаявки = ""
        СтрокаЗаявки = СтрокаЗаявки + выборкаИзБазыДанных.Fields(1)
        IDСотрудника(indexID) = выборкаИзБазыДанных.Fields(0)
        выборкаИзБазыДанных.MoveNext
        Combo2.AddItem СтрокаЗаявки
        indexID = indexID + 1
    Wend
     выборкаИзБазыДанных.Close

Вопрос такой у меня происходит выборка из таблицы в СтрокаЗаявки сохраняется ФИО, а в IDСотрудника(indexID) его номер в таблице, как выбирая из Combo2 сотрудника, мне определить его номер, прога мне выдает первый номер в массиве, а надо номер определенного сотрудника?

[baranich]

подскажите как удалить из combobox.list, один из элементов?

[Alf]

К методу AddItem объекта ComboBox имеется обратный по смыслу - RemoveItem.

[HandKot]

вероятно так

Код:

strID = Combo2.ItemData(Combo2.ListIndex)

[baranich]

Combo2.RemoveItem ДопПер, где ДопПер  as string
ДопПер="Иван Иваныч", он например 3 в списке,
но мне выдается ошибка, почему?

[Alf]

Combo2.RemoveItem ДопПер, где ДопПер as string
ДопПер="Иван Иваныч", он например 3 в списке,
но мне выдается ошибка, почему?

Потому, что метод RemoveItem имеет следующий синтаксис (цитирую MSDN):

RemoveItem Method
     

Removes an item from a ListBox or ComboBox control or a row from an MS Flex Grid control. Doesn't support named arguments.

Syntax

object.RemoveItem index

The RemoveItem method syntax has these parts:

Part Description
object   - Required. Ano bject expression that evaluates to an object in the Applies To list.
index   - Required. Integer representing the position within the object of the item or row to remove. For the first item in a ListBox or ComboBox or for the first row in an MS Flex Grid control, index = 0.


Remarks

A ListBox or ComboBox that is bound to a Data control doesn't support the RemoveItem method.

В качестве параметра следет передать индекс элемента массива строк, который следует удалить, а не сам элемент.

В твоем случае следует вызвать метод таким образом:

Код:

Combo2.RemoveItem 2

(не забывай, что элементы нумеруются с 0)

[baranich]

так в том и проблема, я не знаю номер элемента, он может быть и 1, а может быть и 10, что делать тогда?

[Alf]

Поищи его в массиве, не так он и велик. Хотя наверняка есть решение гораздо изящнее, если пересмотреть алгоритм решения всей задачи.

[baranich]

например у меня список
текст1
текст2
........
текст n

Я могу выбрать из списка и текст 1 и текст n-2 и как мне узнать индекс этого элемента, ведь для removeitem нужен именно индекс элемента. Как же мне узнать индекс элемента

[baranich]

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

[baranich]

вопрос отменяется, уже разобралась, всем спасибо за помощь

[Falsehood]

никогда не работала в VB, но общие принципы устройства контролов ComboBox и ListBox подсказывают, что у ComboBox должно быть свойство Selected(nIndex), которое и принимает истинное значение для nIndex равного индексу выбранного элемента.
т.е. надо в цикле менять значения nIndex от 1 до количества элементов прверять свойство Selected на истинность.

[Alf]

Раз уж программа работает с базой данных, сам бог велел использовать возможности контрола ComboBox по работе с источниками данных ADO. Это, в частности, позволяет отображать в выпадающем списке текст поля, а получать в результате ключ для выбранной записи.

Не знаю сути задачи, поскольку вижу только маленькие ее кусочки в вопросах. Но со стороны похоже, что ее решение искусственно усложнено. Вроде бы простые действия делаются, а при этом все довольно запутанно. Я бы советовал пересмотреть сначала решение в целом, а уже потом шлифовать детали.