Код VBA для подсчета всех числовых столбцов в ListBox, содержащих результаты SQL-запросов - PullRequest
Новая
       15

Код VBA для подсчета всех числовых столбцов в ListBox, содержащих результаты SQL-запросов

0 голосов
/ 03 апреля 2009

Это в Access 2007. Я пытался написать что-то вроде: 

Forms!MyForm!TextBox = Count(ISNUMERIC(ISNUMERIC(QueryResult.Reading)))

Но это возвращает нечисловые результаты. Я также попробовал: 

Forms!MyForm!TextBox = IIF(ISNUMERIC(QueryResult.Reading),Count(ISNUMERIC(QueryResult.Reading),"")

У кого-нибудь есть идеи? Я потерян.

1 Ответ

1 голос
/ 03 апреля 2009

Попробуйте использовать SUM вместо COUNT таким образом, чтобы вы считали результат, если он числовой, и игнорировали его, если это не так. Обратите внимание, я не в состоянии проверить приведенный ниже код, но он должен дать вам представление о том, что я имею в виду. 

Forms!MyForm!TextBox = SUM(IIF(ISNUMERIC(QueryResult.Reading),1,0))
...