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

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


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

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Basic/VBA

Выпуск № 331
от 26.07.2006, 14:05

Администратор:Калашников О.А.
В рассылке:Подписчиков: 188, Экспертов: 29
В номере:Вопросов: 1, Ответов: 2


Вопрос № 49732: уменя проблема с автоматическим присвоение счетов вот задача должно быть 7 символов например номер участка 09, и между этим должны быть 5цифров 0914059 я создаю кнопку генерация лицевых счетов как сделать на Visual Basic ...

Вопрос № 49.732
уменя проблема с автоматическим присвоение счетов
вот задача должно быть 7 символов например
номер участка 09, и между этим должны быть 5цифров 0914059
я создаю кнопку генерация лицевых счетов
как сделать на Visual Basic
Отправлен: 20.07.2006, 19:01
Вопрос задал: Ибрашев Ербол Амангельдиевич (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 1)

Отвечает: AlexanderZh
Здравствуйте, Ибрашев Ербол Амангельдиевич!
пусть NN номер участка, N5 - соответственно 5 цифров (соответственно все integer)
NNS - промежуточный результат (string)
Res - результат (string)
тогда:
функция дополнения нулями:
Function Zeros(ByVal Val As Integer, ByVal L As Integer) As String
Zeros = Right(string(L,"0") & trim(Str(Val)), L)
End Function
а дальше используй такие строки:
NNS=Zeros(NN,2)
res=left(nns,1) & Zeros(n5,5) & right(nns,1)
Только сейчас вспомнил - Наверно точности integer не хватит... (если VB6) меняйте на Long
---------
Людей можно поделить на 10 типов: тех, кто понимает двоичную систему и тех, кто нет...
Ответ отправил: AlexanderZh (статус: 10-ый класс)
Ответ отправлен: 20.07.2006, 20:37
Оценка за ответ: 4

Отвечает: Александр Шевченко
Здравствуйте, Ибрашев Ербол Амангельдиевич!
Нужно последние 5 цифр хранить где-то (где - по вашему выбору: файл, реестр, база данных), возможно для каждого участка отдельно. Храниться будет последний присвоенный номер. При создании номера берется последний, увеличивается на 1, сохраняется в базу/файл/реестр и к нему прикрепляется номер участка. Далее полученный номер (7 символов) проставляется куда нужно.
---------
Вместо внутренней почты лучше стучитесь в аську
Ответ отправил: Александр Шевченко (статус: 8-ой класс)
Ответ отправлен: 21.07.2006, 09:35
Оценка за ответ: 5


Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2006, Портал RusFAQ.ru, Россия, Москва.
Идея, дизайн, программирование: Калашников О.А.
Email: adm@rusfaq.ru, Тел.: +7 (926) 535-23-31
Авторские права | Реклама на портале
Версия системы: 4.34 от 01.06.2006
Яндекс Rambler's Top100

В избранное