ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Помогите с комбо
25 сообщений из 26, страница 1 из 2
  1  все
Помогите с комбо
    #32649785
Art11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Art11
Гость
У меня в Combo1 > Properties > After Update > [Event Procedure], есть код (сам схимичил)

Private Sub Combo1_AfterUpdate()
Select Case Combo1
Case "B": Me.Combo3.RowSource = [Table1]![Name]
End Select
End Sub

где Table1 - таблица в той же базе, Name - колонка.

Хочу изменить содержимое Комбо в зависимости от Case. Я новичок программировании, под рукой нет хелпов. Прошу помочь написать правильный код!

Заранее спасибо
...
Рейтинг: 0 / 0
14.08.2004, 18:46:31
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649793
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
RowSource - это свойство, которым задается тот список, который виден при открывании комбобокса. Нужно, чтобы этот список менялся? Или надо только перейти к другому значению в том же списке?
...
Рейтинг: 0 / 0
14.08.2004, 18:54:27
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649795
Art11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Art11
Гость
Нужно чтобы список менялся. Например был список 1,2,3 стал списком 3,4,5
...
Рейтинг: 0 / 0
14.08.2004, 18:56:36
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649796
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge Gavrilov
Участник
...
Me.Combo3.RowSource = "SELECT [Name] FROM [Table1]"
...

> под рукой нет хелпов.
А куда они делись?
...
Рейтинг: 0 / 0
14.08.2004, 18:57:03
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649797
Арт11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Арт11
Гость
Хелпы не установлены, нахожусь в Бусурмании, здесь за левый софт судят, а СД с офисом кучу денег стоит
...
Рейтинг: 0 / 0
14.08.2004, 18:58:38
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649798
Арт11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Арт11
Гость
...
Me.Combo3.RowSource = "SELECT [Name] FROM [Table1]"

не работает. После Выбора пункта "B" в КОмбо1, в Комбо3 видно "SELECT [Name] FROM [Table1]"
...
Рейтинг: 0 / 0
14.08.2004, 19:04:05
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649799
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лифчик
Участник
А зачем Комбо, если нужна одна колонка? Вроде Listbox есть для этого
...
Рейтинг: 0 / 0
14.08.2004, 19:05:39
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649800
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge Gavrilov
Участник
Арт11...
Me.Combo3.RowSource = "SELECT [Name] FROM [Table1]"

не работает. После Выбора пункта "B" в КОмбо1, в Комбо3 видно "SELECT [Name] FROM [Table1]"

А что в RowSourceType?
...
Рейтинг: 0 / 0
14.08.2004, 19:11:14
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649802
Art11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Art11
Гость
RowSource Type в Комбо3 = Value List
...
Рейтинг: 0 / 0
14.08.2004, 19:16:51
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649803
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge Gavrilov
Участник
Art11RowSource Type в Комбо3 = Value List
А почему?
...
Рейтинг: 0 / 0
14.08.2004, 19:18:38
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649805
Art11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Art11
Гость
Пробовал Table/Query, Field List - в комбо пустота, ничего нет
...
Рейтинг: 0 / 0
14.08.2004, 19:20:58
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649806
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Table/Query - это то, что должно быть.
...
Рейтинг: 0 / 0
14.08.2004, 19:24:19
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649807
Арт11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Арт11
Гость
Люди добрые напишите правильный код плиз
...
Рейтинг: 0 / 0
14.08.2004, 19:25:30
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649809
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge Gavrilov
Участник
Честно говоря, трудно понять, что вам надо.
Если вы действительно хотите просто числовой набор, то
Me.Combo3.RowSource = "3;4;5"
при RowSourceType = Value List
...
Рейтинг: 0 / 0
14.08.2004, 19:27:13
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649810
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лифчик
Участник
Попробуй
Me.Combo3.RowSource = "SELECT [Name] FROM [Table1]"
Me.Combo3.Requery
...
Рейтинг: 0 / 0
14.08.2004, 19:27:34
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649813
Фотография Victosha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Victosha
Участник
Art11Пробовал Table/Query, Field List - в комбо пустота, ничего нет

где пустота - в значении? так и быть должно, если значение по умолчанию не указывается.

а если мышом раскрыть комбо ( на кнопку со стрелкой аниз нажать) - то должен открыться список допустимых значений. Вот в этом списке (допустимых значений) - тоже пустота?

ПСЫ

Интересно, а за чтение книжек - в Басурмании - тоже под суд?
...
Рейтинг: 0 / 0
14.08.2004, 19:40:45
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649817
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
возьми mdb(Acc97)
примитивный вариант связанных списков
Sp_R - посмотри запрос всё станет ясно
...
Рейтинг: 0 / 0
14.08.2004, 19:49:12
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649954
Art11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Art11
Гость
To Victosha - xорошо, что сказали, что надо на кнопочку нажать, а то я не знал............
говорю же там пустота, и в комбо и в списке. А книжки то надо достать. Просто я в бейсике давно не работал, лет 10 и синтаксис вообще не помню. Если бы был С++ с синтаксисом по крайней мере не было бы проблем. Так, что если можете помогите. И про дефолт значение тоже знаю.
...
Рейтинг: 0 / 0
15.08.2004, 09:56:21
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32649968
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
Art11To Victosha - xорошо, что сказали, что надо на кнопочку нажать, а то я не знал............
говорю же там пустота, и в комбо и в списке. А книжки то надо достать. Просто я в бейсике давно не работал, лет 10 и синтаксис вообще не помню. Если бы был С++ с синтаксисом по крайней мере не было бы проблем. Так, что если можете помогите. И про дефолт значение тоже знаю.
пример смотреть религия не позволяет ?
...
Рейтинг: 0 / 0
15.08.2004, 11:11:39
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32650064
Фотография xax_nv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
xax_nv
Участник
Код: plaintext
1.
2.
3.
4.
5.
Private Sub Combo1_AfterUpdate()
Select Case Combo1.Value
Case "A": Me!Combo3.RowSource = "SELECT [Table1]![Name]"
Case "B": Me!Combo3.RowSource = "SELECT [Table2]![Name]"
End Select
End Sub
По-моему это то, что Вы хотели получить. В зависимости от значения в Combo1
меняется RowSource для Me!Combo3.

Успехов!
...
Рейтинг: 0 / 0
15.08.2004, 17:27:38
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32650071
Фотография xax_nv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
xax_nv
Участник
Код: plaintext
1.
2.
3.
4.
5.
Private Sub Combo1_AfterUpdate()
Select Case Combo1.Value
Case "A": Me!Combo3.RowSource = "SELECT [Table1]![Name] From [Table1]"
Case "B": Me!Combo3.RowSource = "SELECT [Table2]![Name] From [Table1]"
End Select
End Sub

Поторопился и не дописал. Теперь вроде все.
...
Рейтинг: 0 / 0
15.08.2004, 17:41:18
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32650074
Фотография xax_nv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
xax_nv
Участник
Опять поторопился.
Код: plaintext
Case "B": Me!Combo3.RowSource = "SELECT [Table2]![Name] From [Table2]"

А вообще, если в таблице одно поле, то можно просто

Код: plaintext
Case "B": Me!Combo3.RowSource = "[Table2]"
...
Рейтинг: 0 / 0
15.08.2004, 17:48:26
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32650082
Alexey Sh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexey Sh
Участник
А чем не устраивает онлайн хелп на microsoft.com?
...
Рейтинг: 0 / 0
15.08.2004, 18:06:20
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32650085
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
http://www.msaccess.ru/Download.html
...
Рейтинг: 0 / 0
15.08.2004, 18:12:40
| Ответить | Цитировать | Написать  
Помогите с комбо
    #32650143
Ukraina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ukraina
Участник
Shuhard http://www.msaccess.ru/Download.html

Спасибо за информацию-ссылку. Гениальная вещь!!!
...
Рейтинг: 0 / 0
15.08.2004, 23:52:50
| Ответить | Цитировать | Написать  
25 сообщений из 26, страница 1 из 2
  1  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Помогите с комбо
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32649807&tid=1672429]:
 0ms
get settings:
 8ms
get forum list:
 8ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 37ms
get topic data:
 5ms
get forum data:
 1ms
get page messages:
 36ms
get tp. blocked users:
 1ms
others: 246ms
total:  346ms
созд. / загр.: 346ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]