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

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


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

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

Выпуск № 619
от 29.09.2007, 15:05

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


Вопрос № 103219: Есть числовая строка BP011_03, когда в ней стоит число с "-" например -14 нужно зделать так чтоб автоматически вместо "-" присваивался "+". ..

Вопрос № 103.219
Есть числовая строка BP011_03, когда в ней стоит число с "-" например -14 нужно зделать так чтоб автоматически вместо "-" присваивался "+".
Отправлен: 24.09.2007, 14:38
Вопрос задал: Коновалов Николай Станиславович (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Rojohn
Здравствуйте, Коновалов Николай Станиславович!
Если через Recordset, то конструкция будет выглядеть так:
Set rs1 = db1.OpenRecordset("Select BP011_03, ... From Table1")
If rs1.EOF=False then
Do While Not rs1.EOF
rs1.Edit
rs1![BP011_03]=Abs(rs1![BP011_03])
rs1.Update
rs1.MoveNext
Loop
End If
rs1.Close

Если же через SQL, то тоже самое (Abs(Table1.BP011_03)) надо вставить в Ваш запрос на обновление.
---------
Век живи - век учись, с пользой и без напряга!
Ответ отправил: Rojohn (статус: 8-ой класс)
Ответ отправлен: 24.09.2007, 18:00
Оценка за ответ: 5

Отвечает: Черников Игорь Владимирович
Здравствуйте, Коновалов Николай Станиславович!
Вам уже написали наверно, что для этого служит оператор temp = ABC(переменная)
переводится как "абсолютное число", т.е. убирается знак "-" (минус).
Удачи!

BP011_03=abc(BP011_03)

из хелпа:
В данном примере функция Abs используется для вычисления абсолютного значения числа.

Dim MyNumber
MyNumber = Abs(50.3) ' Возвращает 50.3.
MyNumber = Abs(-50.3) ' Возвращает 50.3.
---------
От каждого по способностям, каждому по труду
Ответ отправил: Черников Игорь Владимирович (статус: 5-ый класс)
Ответ отправлен: 24.09.2007, 19:37
Оценка за ответ: 5


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

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

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

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

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


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


© 2001-2007, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.60.05 от 27.09.2007
Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное