Поле со списком добавить запись

Фесенко Олег

Дата: 01.09.2005 10:57:05

Access 97

Полчаса уже по форуму лазяю. У всех --- 2000-й Access. Все AddItem советуют.

Вопрос
форма -> поле со списком (список пуст полностью).
как программно добавить число. Просто взять и добавить!

Фесенко Олег

Дата: 01.09.2005 11:00:11

например в 2000-м Access я бы так написал:

i=0
do
     Me.MyComboBox.AddItem = i
i=i+1
loop while i<100

Владимир Саныч

Дата: 01.09.2005 11:01:34

Если RowSourceType = Value List, то

XXX.RowSource=XXX.RowSource & ";" & cstr(число)

Пользователь2

Дата: 01.09.2005 11:14:28

Фесенко Олег

например в 2000-м Access я бы так написал

В 2000 нет AddItem.

Сделай как Владимир Саныч подсказывает.

    For intI = 1 To 100
        str = str & ";" & CStr(intI)
    Next
    
    Me.cbo.RowSourceType = "Value List"
    Me.cbo.RowSource = Mid(str, 2)

Фесенко Олег

Дата: 01.09.2005 11:26:07

Да, получилось, но эти числа почему-то "просто есть" в списке, но в поле не пускаются.

"Блокировка" и "Доступ" в норме.

Пользователь2

Дата: 01.09.2005 12:30:25

Фесенко Олег

Да, получилось, но эти числа почему-то "просто есть" в списке, но в поле не пускаются.

Поясни подробнее. В какое поле они должны "пускаться", и что значит "пускаться"?