powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / ?глюк? с combo box
6 сообщений из 6, страница 1 из 1
?глюк? с combo box
    #32209730
Artem K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
хочется: узнать является ли combo0.value значением из списка или нет. Обычно помогает combo0.listindex : если -1 => нет, >-1 => значение из списка.

так вот проблема:
если строчка в списке содержит кавычки, то ListIndex при выборе этой строчки сбрасывается в -1.
...
Рейтинг: 0 / 0
?глюк? с combo box
    #32209735
Jem
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Value является значением присоеденного столба (заметь он может быть скрыт). Никаких глюков не помню.
...
Рейтинг: 0 / 0
?глюк? с combo box
    #32209743
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
только что попробовал в Ас97 все пашет.
никаких глюков.
...
Рейтинг: 0 / 0
?глюк? с combo box
    #32209769
Artem K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
steps to reproduce the behavior (как говорится):
создаем пустую базу/проект access.
создаем форму на ней combo box (combo0) и text box (text1).
combo0:
в row source type выбираем Value List
в row source пишем 'строка с "кавычками" ';'строка без кавычек'
text1:
в Control Source пишем =[combo0].[ListIndex]

вот.
...
Рейтинг: 0 / 0
?глюк? с combo box
    #32209855
Artem K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ну, допустим, пример довольно искусственный (особенно пробел между " и ').

на самом деле в rowsource у меня select field1,field2 from t
надо получить field1 соответствующий field2.
так вот если строчка в field2 содержит кавычки то
debug.print forms("form").combo0.column(0) дает Null
debug.print forms("form").combo0.listindex дает -1

чо делать то?
или нынче не принято строчки с кавычками (например: Издательский дом "ПУШКИНСКАЯ ПЛОЩАДЬ") в базе хранить?

З.Ы. ADP access 2000 (или XP без разницы) + MS SQL
...
Рейтинг: 0 / 0
?глюк? с combo box
    #32210276
Artem K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
2sasha_1: спасибо за ответ

надеюсь ктоньть еще не поленится и проверит или объяснит мне что я делаю не так?

а то пришлось руками значения сравнивать:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Private Function inlist(ctrl As String) As Boolean
Dim val As String, i As Integer
With Me.Controls(ctrl)
    For i =  0  To .ListCount -  1 
        If .ItemData(i) = .value Then
            inlist = True
            Exit Function
        End If
    Next
End With
End Function
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / ?глюк? с combo box
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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