Как мне присвоить числовые значения Itema-ам в listbox-e, combobox-e...

Здравствуйте господа.
Простите за поздний некропостинг, нашел подходящую темку для моего вопроса если позволите.

Дело в том, что я только начал осваивать VisualBasic.NET а вот проблема с которой я столкнулся коробит меня давно.
Задача: Как мне присвоить числовые значения Itema-ам в listbox-e, combobox-e и другим подобного рода тулсам.

Мне просто необходимо чтобы при выборе какого-нибудь итема, TextBox1.Text=Той цифре которая присвоена итему. Я новичок ооооочень далекий еще от нормального решения проблемы поэтому иду пока теми методами в которых я разобрался.

А суть программулины такова Есть Комбобокс в нем коллекция из 10 итемов. Каждый итем имеет свою стоимость, пользователь выбирает в комбобоксе интересующий его итем, в Text.Box1 прописывается так цифра которая присвоена этому итему далее я расчитываю кнопкой расчет требуемую процедуру. Ну к примеру Rezultat.Text=Textbox1.Text*Textbox2.tex t

Ну вот теперь вы понимаете для чего мне нужно присвоить числа каждому итему Комбобокса.

Блин вроде все примитивно, но я уже извелся и присваивал переменные и так и сяк и SelectedItem ну ошибок вроде нет но ВБ ругается. Помогите плиз. Ато всю программку написал, а вот эта хрень самая важная овнит меня по черному.


Спасибо заранее всем за ответы.

0

Ну вобщето надо было те отдельную тему создать.
Итак по вопросу:

0

Прошу прощения, подумалось что туда будет логичнее.


Скажите плиз а что за объект lv1 ВБ ругается и говорит что я его не объявлял. Я так понимаю это какой-то тулс типа рич текста который я должен вынести в форму, по логике я думал что это название комбобокса, но нет. Все равно сохраняется ошибка.


Я еще не очень сильно разбираюсь в ВБ вы уж извините.


Поясните насчет lv1

Добавлено через 13 часов 25 минут
Ладно товарищи давайте тогда так поставлю вопрос.

Почему конструкция такого типа не имеет жизни:

Цифирка в скобках мною подразумевается как один из итемов который выберит пользователь от 0 и до 9 (всего элементов 10)
В этой казалось бы логичной на первый взгляд конструкции он стабильно прерывает операцию и указывает на then

Пробовал в самой процедуре комбобокса указывать так:

Combobox1.SelectItem(1)=200

Пробовал через присваивания, все пофигу.

Чего-то я не догоняю, меня это очень мучает, ребят помогите плиз

0

0

Да нет же, этот метод лишь выводит в окне TextBox1 номер итема или индекса.


В том то и дело что мне нужно чтобы он вводил его значение.
Вот грубо говоря если бы я мог присвоить итему 0 значение 200, тогда в вашей конструкции она бы ссылалась на его значение.

А так она будет выводить или номер или название которое описанно в итеме.

Мой вопрос можно обрисовать еще легче.

Имеем Combobox1>
>Collection
Колбаса
Огурец
Творог
Яблоко

В вашем предложении для решения примера он выводит в TextBox1 всего лишь порядковый номер продукта(итема) в коллекции, в данном случае от 0 до 3.

А мне нужно присвоить Колбасе Огурцу Творогу и Яблоку отдельные значения (цены). После того как пользователь выбирет понравившийся продукт в Textbox1 должна напечататься его стоимость в виде цифры.
Это нужно для моиз ограниченных целей ))) Только так я могу включить TextBox1 в формулу расчета.
Естественна это кусок моей комплексной задачи. И именно он меня тормозит. Черт бы его подрал (((

Мои пробы примитивны и поддаются только моей логике но все же.
Я делал так чтобы придать значение

1. Вариант - Combobox1.Selected.Item(0)=200

2. Вариант - Dim a as Ineger =200
Combobox1.Selected.Item(0)=a

И в том и другом случае ВБ глотал конструкцию без ошибок но выполнение операции прерывалось с указанием причины Свойство "Chars" имеет атрибут ReadOnly.

Понять что я делаю не то, я пока не могу в силу недостаточных знаний.

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

0

Вот это надо?
Тут (по идее) при выборе 7 строчки ComboBox'а в текст1 будет 200 записываться...

1

тогда создаем условие, думаю вот такое
Если я Вас опять же правильно понял

2

Да-а-а-а-а-а!


Вы мой спаситель! Благодарю.


Черт я бы еще не скоро догадался


Спасибо огромное.
Теперь все работает, при выборе итема прописывает цифирку в текст боксе.

Добавлено через 2 минуты

Сообщение от Ciberst тогда создаем условие, думаю вот такое VB.NET 1 2 3 4 5 Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged    If ListBox1.SelectedIndex = 0 Then TextBox1.Text = "200"    If ListBox1.SelectedIndex = 1 Then TextBox1.Text = "300"    If ListBox1.SelectedIndex = 2 Then TextBox1.Text = "400" End Sub Если я Вас опять же правильно понял

Блин а я не догадался ввести в конструкцию "Index="

Спасибо за варианты ребят вы очень выручили.

2

Да не за что! Обращайтесь!

0

Ну я дал отправной вариант... Так сказать...

0