Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: Программирование на Basic / VBA

Подписаться Бесплатная «Золотая» новостная рассылка . Подписчиков 1.824 RSS
←   Ноябрь 2013   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30


За последние 60 дней ни разу не выходила


Сайт рассылки: http://prog.rusfaq.ru/basic
Открыта: 14-03-2002

Автор
Калашников О.А.

Статистика

1.824 подписчиков
0 за неделю
←   Все выпуски   →

RFpro.ru: Программирование на Basic / VBA


Хостинг портала RFpro.ru:
Московский хостер
Профессиональный ХОСТИНГ на базе Linux x64 и Windows x64

РАССЫЛКИ ПОРТАЛА RFPRO.RU

Лучшие эксперты по данной тематике

Асмик Гаряка
Статус: Советник
Рейтинг: 10653
∙ повысить рейтинг » 		Роман Селиверстов
Статус: Советник
Рейтинг: 5014
∙ повысить рейтинг » 		Гуревич Александр Львович
Статус: Профессионал
Рейтинг: 4412
∙ повысить рейтинг »

/ КОМПЬЮТЕРЫ И СОФТ / Программирование / Basic/VBA

Номер выпуска:1091
Дата выхода:30.11.2013, 12:30
Администратор рассылки:Андреенков Владимир (Профессор)
Подписчиков / экспертов:57 / 30
Вопросов / ответов:3 / 5

Консультация # 39799: Здравствуйте!!! Я хочу написать программу, которая будет подсчитывать количество символов, символы будут вводится через TextBox, как это сделать, можете написать пример, может есть какая-то функция или процедура подсчёта символов или что-то вроде такого как в Паскале?...

Консультация # 114663: Здравствуйте дорогие Эксперты. Мне нужно сделать так: Есть база данных Access 2000. В ней есть одна таблица и одна форма по всем записям этой таблицы. На форму положено Поле записи и кнопка и отображены данные таблицы В один столбец. Теперь то, что я хочу, чтобы происходило при нажатии на эту кнопку: Тоже самое, что происход...
Консультация # 25923: Здрасвуйте уважаемые эксперты. Я еще раз пишу на эту тему но вопрос другой. Есть combobox1 со своим свойством listfillrange (это все в екселе) я задал этот диапазон теперь мне надо взять индексы выбранных в боксе элементов я беру их при помощи свойства listindex но мне надо чтоб индекс первого элемента был равен 1 я ставлю option base в 1 w...

Консультация # 39799:

Здравствуйте!!! Я хочу написать программу, которая будет подсчитывать количество символов, символы будут вводится через TextBox, как это сделать, можете написать пример, может есть какая-то функция или процедура подсчёта символов или что-то вроде такого как в Паскале?

Дата отправки: 09.04.2006, 14:54
Вопрос задал: ataman
Всего ответов: 3
Страница онлайн-консультации »

Консультирует BuTeK:

Здравствуйте, ataman!
Вроде так можно
Dim intNameLength As Integer
Dim Str As String
Str = TextBox1.Text
intNameLength = Str.Length

Консультировал: BuTeK
Дата отправки: 09.04.2006, 15:22
Рейтинг ответа:

НЕ одобряю 0 одобряю!

Консультирует Ерёмин А.А. (Специалист):

Здравствуйте, ataman!
Вот выдержка из одной документации:

Функция Len


Len(String | Varname)

Функция Len вычисляет число символов в строке или размер заданной переменной.Из двух возможных аргументов должен быть указан только один(и только один). Для определяемых пользователем типов Len возвращает размер, который требуется для записи переменной в файл

Возвращаемое значение
Возвращает значение типа Long, содержащее число символов в строке или число байт, необходимое для размещения переменной

Параметры

String
Обязательный аргумент -любое допустимое строковое выражение.
Varname
Обязательный аргумент -любое допустимое имя переменной.Если выражение имеет значение Null, то возвращается Null.Если же аргумент имеет значение типа Variant,то функция Len обрабатывает его так же, как и значение типа Strin g, и всегда возвращает число содержащихся в нем символов

Пример:
 \' Вычисляем длину строки Русский_Проект
Print Len("Русский_Проект")

Консультировал: Ерёмин А.А. (Специалист)
Дата отправки: 09.04.2006, 15:23
Рейтинг ответа:

НЕ одобряю 0 одобряю!

Консультирует Александр Шевченко (Студент):

Здравствуйте, ataman!
К вышесказанному могу добавить, что если надо посчитать количество символов без пробелов например, то предварительно пробелы надо убрать функцией Replace, то есть код из первого ответа изменится на:
Dim intNameLength As Integer
Dim Str As String
Str = TextBox1.Text
Str = Replace(Str, " ", "") \'заменяем пробел на "ничего"
intNameLength = Len(Str)

Консультировал: Александр Шевченко (Студент)
Дата отправки: 13.04.2006, 17:16
Рейтинг ответа:

НЕ одобряю 0 одобряю!

Консультация # 114663:

Здравствуйте дорогие Эксперты.
Мне нужно сделать так:
Есть база данных Access 2000.
В ней есть одна таблица и одна форма по всем записям этой таблицы.
На форму положено Поле записи и кнопка и отображены данные таблицы В один столбец.
Теперь то, что я хочу, чтобы происходило при нажатии на эту кнопку:
Тоже самое, что происходит в окошке Поиск и замена при нажатии кнопки Найти далее. Образцом является Поле записи. Свойства Поиск в этой таблице (Main), Собпадение С любой частью поля, Просмотр Все, Регистр не важен.
Чтобы без открытия этого окошка, сразу переходило к записи, какое либо из данных которой совпадает со значение в Поле записи, повторное нажатие, к Следующей записи, записи нет или больше нет - выдает окно нет записи.
Может это и не сложно - но почему-то у меня не получается ничего.
Помогите пожалуйста.

Дата отправки: 18.12.2007, 14:53
Вопрос задал: Евгения
Всего ответов: 1
Страница онлайн-консультации »

Консультирует Тесленко Евгений Алексеевич:

Здравствуйте, Евгения!

В Access есть возможность установить фильтр на набор записей или в качестве источника строк ис пользовать запрос с условием отбора.
Для примера в коде формы можно разместить подобный код:

Table - таблица источник данных
field1-3 - поля в которых будет производиться сравнение
результатом будет отображение только записей в которых в которых присутствует текст введенный в поле (без диалога отображающего номер).

Если для Вас критично отображение MsgBox, конструкция будет сложнее.
Пишите.
Евгений.

Приложение:

Консультировал: Тесленко Евгений Алексеевич
Дата отправки: 20.12.2007, 18:17
Рейтинг ответа:

НЕ одобряю 0 одобряю!

Консультация # 25923:

Здрасвуйте уважаемые эксперты.
Я еще раз пишу на эту тему но вопрос другой.
Есть combobox1 со своим свойством listfillrange (это все в екселе) я задал этот диапазон теперь мне надо взять индексы выбранных в боксе элементов я беру их при помощи свойства listindex но мне надо чтоб индекс первого элемента был равен 1 я ставлю option base в 1 w general declarations но индексы начинаются опять с нуля как мне это сделать. Я прикрепу весь код это код кнопки, написал его я и хочу предупредить что я новичок и еще прошу если можно не предлагать его менять я и так еле это написал.
Заранее спасибо.

Дата отправки: 06.09.2005, 13:35
Вопрос задал: Гевонд Джонович
Всего ответов: 1
Страница онлайн-консультации »

Консультирует Чурсанов Евгений Ильич:

Здравствуйте, Гевонд Джонович!
Я давно не программировал в Excel так что могу ошибаться, но там параметр Option Base {1|0} предназначен для обозначения нижней границы отсчёта в массивах. Например:
1 вариант:
option base 0
dim intArray(10) as integer
в массиве intArray 11 элементов с 0 до 10;

2 вариант:
option base 1
dim intArray(10) as integer
в массиве intArray 10 элементов с 1 до 10;

Не с нуля как обычно а с единицы.
Если вам очень нужно использовать не ноль, а единицу то предлагаю заранее брать индекс + 1 (Смотри приложение) . Хотя лучше привыкайте работать с 0
так как он во многих контролах идёт первым.

Приложение:

Консультировал: Чурсанов Евгений Ильич
Дата отправки: 06.09.2005, 14:43
Рейтинг ответа:

НЕ одобряю 0 одобряю!

Оценить выпуск | Задать вопрос экспертам

главная страница  |  стать участником  |  получить консультацию
техническая поддержка  |  восстановить логин/пароль

Дорогой читатель!
Команда портала RFPRO.RU благодарит Вас за то, что Вы пользуетесь нашими услугами. Вы только что прочли очередной выпуск рассылки. Мы старались. Пожалуйста, оцените его. Если совет помог Вам, если Вам понравился ответ, Вы можете поблагодарить автора - для этого в каждом ответе есть специальные ссылки. Вы можете оставить отзыв о работе портале. Нам очень важно знать Ваше мнение. Вы можете поближе познакомиться с жизнью портала, посетив наш форум, почитав журнал, который издают наши эксперты. Если у Вас есть желание помочь людям, поделиться своими знаниями, Вы можете зарегистрироваться экспертом. Заходите - у нас интересно!
МЫ РАБОТАЕМ ДЛЯ ВАС!

© 2001-2012, Портал RFPRO.RU, Россия
Авторское право: ООО "Мастер-Эксперт Про"
Калашников О.А. | Гладенюк А.Г.
Хостинг: Компания "Московский хостер"
Версия системы: 2011.6.36 от 26.01.2012
В избранное