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

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

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

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

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

ПСЫ

Интересно, а за чтение книжек - в Басурмании - тоже под суд?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.08.2004, 19:49:12
    #32649817
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с комбо
возьми mdb(Acc97)
примитивный вариант связанных списков
Sp_R - посмотри запрос всё станет ясно
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2004, 09:56:21
    #32649954
Art11
Art11
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с комбо
To Victosha - xорошо, что сказали, что надо на кнопочку нажать, а то я не знал............
говорю же там пустота, и в комбо и в списке. А книжки то надо достать. Просто я в бейсике давно не работал, лет 10 и синтаксис вообще не помню. Если бы был С++ с синтаксисом по крайней мере не было бы проблем. Так, что если можете помогите. И про дефолт значение тоже знаю.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2004, 11:11:39
    #32649968
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с комбо
Art11To Victosha - xорошо, что сказали, что надо на кнопочку нажать, а то я не знал............
говорю же там пустота, и в комбо и в списке. А книжки то надо достать. Просто я в бейсике давно не работал, лет 10 и синтаксис вообще не помню. Если бы был С++ с синтаксисом по крайней мере не было бы проблем. Так, что если можете помогите. И про дефолт значение тоже знаю.
пример смотреть религия не позволяет ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2004, 17:27:38
    #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:41:18
    #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:48:26
    #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, 18:06:20
    #32650082
Alexey Sh
Alexey Sh
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с комбо
А чем не устраивает онлайн хелп на microsoft.com?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2004, 18:12:40
    #32650085
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с комбо
http://www.msaccess.ru/Download.html
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2004, 23:52:50
    #32650143
Ukraina
Ukraina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с комбо
Shuhard http://www.msaccess.ru/Download.html

Спасибо за информацию-ссылку. Гениальная вещь!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
  1  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Помогите с комбо / 25 сообщений из 26, страница 1 из 2
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 305ms
Закрыть
start [/forum/topic.php?fid=45&tablet=1&tid=1672429]:
 0ms
get settings:
 7ms
get forum list:
 11ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 37ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 36ms
get tp. blocked users:
 1ms
others: 201ms
total:  305ms
x
x
Закрыть


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