Функции ComboBox?

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Flex
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 10.10.2003 (Пт) 0:49

Функции ComboBox?

Сообщение Flex » 10.10.2003 (Пт) 1:05

немогу написать код, и не где не найти..я новичок в вб...
Вообщем надо, чтобы в стандартном КомбоБоксе(раскрывающийся список) выбирая какую нимбудь строчку из списка выводило на другую форму(при нажатие кнопки), какой либо комментарий?? а как соглосовать вместе несколько комбобоксов..множественный выбор из разных комбобоксов..вот к примеру как на картинке...Изображение

VB 6.0

vrodo
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 109
Зарегистрирован: 09.10.2003 (Чт) 18:45
Откуда: Дубна МО, Москва

Сообщение vrodo » 10.10.2003 (Пт) 8:53

Объясни собсно задачу
что должен ввести и что должно получится
Чтобы понять свои ошибки их достаточно написать (c)
Интернет большой, ему видней
С наилучшими Пожеланиями и Всех Благ :D

Flex
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 10.10.2003 (Пт) 0:49

Сообщение Flex » 10.10.2003 (Пт) 11:31

какая разница, что должно получится главное, чтобы работало... :?

RayShade
Scarmarked
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 10.10.2003 (Пт) 11:38

Слов нет. Остались только одни буквы, да и те, кажется, смысл потеряли :)

Flex
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 10.10.2003 (Пт) 0:49

Сообщение Flex » 10.10.2003 (Пт) 11:39

ктонить может написать код где использовались бы разные функции к приминению комбобокса и приминением кнопкой на другую форму?? я то в этом новичёк, но позарез надо 8)

RayShade
Scarmarked
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 10.10.2003 (Пт) 11:48

АААААААААААААААААААААААААААААААА!

вопль души просто :)

Не надаа! Напишите ему код а то я больше форум модерить не смогу :)

Ronin_1978
Новичок
Новичок
 
Сообщения: 46
Зарегистрирован: 05.04.2003 (Сб) 14:42
Откуда: Москва

Сообщение Ronin_1978 » 10.10.2003 (Пт) 11:56

Не, брат, с таким раскладом ты кода не дождёшься. Напиши как-то поконкретнее: чего должно происходить и когда оно должно это делать. Вот тогда ты код и получишь... :wink:
... На небесах святые - ты слышишь стоны?
По тебе плачет колокол, а где-то во мраке
На ветру качаются вопросительные знаки... (С) Каста.

vrodo
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 109
Зарегистрирован: 09.10.2003 (Чт) 18:45
Откуда: Дубна МО, Москва

Сообщение vrodo » 10.10.2003 (Пт) 11:58

Ты сам то знаеш что ты хочеш
Ведеш себя как пользователь
Чтобы понять свои ошибки их достаточно написать (c)
Интернет большой, ему видней
С наилучшими Пожеланиями и Всех Благ :D

Flex
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 10.10.2003 (Пт) 0:49

Сообщение Flex » 10.10.2003 (Пт) 12:25

Ладно извените! Попробую по подробнее 8)) :
Короче: Есть несколько ComboBox'ов (буду ориентироватся по выше показанной картинке), выбараю из них те варианты которые мне подходят(например): Из первого(Из раздела Страны) Россия (а там может быть множество вариантов), из второго (Из раздела Город) Москва(так же там существует много вариантов), из Третьего например Компьютеры(так же там существует много вариантов), далее нажимаю кнопку Вперёд! и проиходит следующее: Открывается Новая форма и на ней пишется в соответствии с выбранными вариантами(Россия, Москва, Компьютеры) на три Лейбла (Метка, Label) какой либо текст(Ну на пример на первый Лейбл пишется: Вы выбрали Страну Россия, на второй: вы выбрали Город Москва и на третий: вы выбрали род Занятий Компьютер)
Если не понятно, тогда я даже не знаю как ещё оъяснить! 8о)

Flex
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 10.10.2003 (Пт) 0:49

Сообщение Flex » 10.10.2003 (Пт) 12:27

Спасибо всем, хоть обратили на мой пост внимание 8о)

:roll:

vrodo
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 109
Зарегистрирован: 09.10.2003 (Чт) 18:45
Откуда: Дубна МО, Москва

Сообщение vrodo » 10.10.2003 (Пт) 13:34

Перед тем как открыть новую форму напиши ченибудь ввиде

Код: Выделить всё
dim nextform as new [form2 name]
nextform.label1.text = combobox1.text
nextform.show
Чтобы понять свои ошибки их достаточно написать (c)
Интернет большой, ему видней
С наилучшими Пожеланиями и Всех Благ :D

Cyrax
Cyberninja
Cyberninja
Аватара пользователя
 
Сообщения: 891
Зарегистрирован: 25.04.2002 (Чт) 21:20
Откуда: Magnitogorsk, Russia

Сообщение Cyrax » 10.10.2003 (Пт) 13:34

Flex писал(а):Спасибо всем, хоть обратили на мой пост внимание 8о)

:roll:

вобще-то трудно было необратить...

все очень просто:

две формы - Form1 (с комбиками и кнопкой "Вперед!"), и Form2 (с метками)
код для Form1 будет таким (точнее для кнопки "Вперед!". пусть она называется, например "cmdRun")

Код: Выделить всё
Private Sub cmdRun_Click()
  Form2.Show
EndSub


а код для второй формы будет таким:
Код: Выделить всё
Private Sub Form2_Load()
  Label1.Caption = Form1.Combobox1.Text
  Label2.Caption = Form1.Combobox2.Text
  Label3.Caption = Form1.Combobox3.Text
End Sub
Ты это ему расскажи. Я уже пять болтов отвинтил, и конца не видно... (озадаченно) А это в какую сторону тянуть? Ну-ка... Ага, этот был лишний, этот вообще не отсюда, и этот... Точно, два болта.

Welcome to IRC

Flex
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 10.10.2003 (Пт) 0:49

Сообщение Flex » 10.10.2003 (Пт) 14:08

Cyrax писал(а):
Flex писал(а):Спасибо всем, хоть обратили на мой пост внимание 8о)

:roll:

вобще-то трудно было необратить...

все очень просто:

две формы - Form1 (с комбиками и кнопкой "Вперед!"), и Form2 (с метками)
код для Form1 будет таким (точнее для кнопки "Вперед!". пусть она называется, например "cmdRun")

Код: Выделить всё
Private Sub cmdRun_Click()
  Form2.Show
EndSub


а код для второй формы будет таким:
Код: Выделить всё
Private Sub Form2_Load()
  Label1.Caption = Form1.Combobox1.Text
  Label2.Caption = Form1.Combobox2.Text
  Label3.Caption = Form1.Combobox3.Text
End Sub


Да это не совсем то, что мне нужно!!!

Cyrax
Cyberninja
Cyberninja
Аватара пользователя
 
Сообщения: 891
Зарегистрирован: 25.04.2002 (Чт) 21:20
Откуда: Magnitogorsk, Russia

Сообщение Cyrax » 10.10.2003 (Пт) 14:12

Flex писал(а):Да это не совсем то, что мне нужно!!!

:shock: не понял...
- ты код просил?
- просил...
- получи...

или изьясняйтесь, пожалуйста, по-конкретней...
Последний раз редактировалось Cyrax 10.10.2003 (Пт) 14:45, всего редактировалось 1 раз.
Ты это ему расскажи. Я уже пять болтов отвинтил, и конца не видно... (озадаченно) А это в какую сторону тянуть? Ну-ка... Ага, этот был лишний, этот вообще не отсюда, и этот... Точно, два болта.

Welcome to IRC

Ronin_1978
Новичок
Новичок
 
Сообщения: 46
Зарегистрирован: 05.04.2003 (Сб) 14:42
Откуда: Москва

Сообщение Ronin_1978 » 10.10.2003 (Пт) 14:41

Тогда, может, так:

В Form1:
Код: Выделить всё
Option Explicit

Private Sub cmdRun_Click()
Country = Combo1.Text
City = Combo2.Text
Interests = Combo3.Text
Form2.Show
End Sub


В Form2:
Код: Выделить всё
Option Explicit

Private Sub Form_Load()
Label1.Caption = "Вы выбрали" + Country
Label2.Caption = "Вы выбрали" + City
Label3.Caption = "Вы выбрали" + Interests
End Sub


В Module:
Код: Выделить всё
Option Explicit

Public Country As String
Public City As String
Public Interests As String


Ну теперь-то правильно???
... На небесах святые - ты слышишь стоны?
По тебе плачет колокол, а где-то во мраке
На ветру качаются вопросительные знаки... (С) Каста.

Flex
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 10.10.2003 (Пт) 0:49

Сообщение Flex » 10.10.2003 (Пт) 20:09

совсем не то, что я даже описал! Вы всё мне делаете чтобы выводился текст который в комбобоксе указан! А мне надо, чтобы при выборе в комбобоксе варианта (а их там может быть много) происходило в новой форме определённое действие, а именно писался бы текст (на лайбл) привязанный к выбранному варианту из комбобокса...в комбобоксе много вариантов и у каждого варианта, чтобы было разные действия...
Предположим выбрал я Страну: Россия а на другой форме писалось у вас хорошая Страна! А если выберу страну Ирак(всё из того же комбобокса).. писалось бы у вас плохая страна ... ну предположим так просто.. я неумею такие вещи обьяснять которых сам не понимаю 8(((

короче пример на html просто сайт где на хтмл используются комбобоксы http://www.anketa.ru/

З.Ы.
может кто-то меня так поймёт? 8(( Мне это очень надо.. :?
Последний раз редактировалось Flex 10.10.2003 (Пт) 20:39, всего редактировалось 1 раз.

Flex
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 10.10.2003 (Пт) 0:49

Сообщение Flex » 10.10.2003 (Пт) 20:25

по-моему надо это делать через If...

Flex
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 10.10.2003 (Пт) 0:49

Сообщение Flex » 10.10.2003 (Пт) 22:51

:?:
Последний раз редактировалось Flex 11.10.2003 (Сб) 1:23, всего редактировалось 1 раз.

Flex
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 10.10.2003 (Пт) 0:49

Сообщение Flex » 10.10.2003 (Пт) 23:01

как можно делать ссылки на сайт :roll: ?

Flex
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 10.10.2003 (Пт) 0:49

Сообщение Flex » 11.10.2003 (Сб) 1:55

вообщето я иммел ввиду код что-то вроде этого, я долго парил, но всёже допарил, для меня это новая наука...может ктото знает код по оптимальнее и надёжнее??:
Код: Выделить всё
Private Sub cmdRun_Click()
If Combo1.ListIndex = 0 Then
  Form2.Label1.Caption = "текст к первой строчки комбобокса"
ElseIf Combo1.ListIndex = 1 Then
  Form2.Label2.Caption = "текст ко второй строчки комбобокса"
Else
  Form2.Label3.Caption = "текст к третей строчки комбобокса"
End If
  Form2.Show
  Form1.Hide
End Sub

Tarik
Агент Системы
Агент Системы
Аватара пользователя
 
Сообщения: 1222
Зарегистрирован: 03.01.2003 (Пт) 16:05
Откуда: Москва

Сообщение Tarik » 11.10.2003 (Сб) 19:20

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

Ever tried? Ever failed? No matter. Try again! Fail again! Fail better!


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 2

    TopList