Access ASP SQL Server VBA NET - Форумы по проектированию

LEADERSOFT.ru Разработка на заказ программ и сайтов

Форумы по информационным технологиям

Начало

Forums

Регистрация | Вход

Форумы

Поиск

Список форумов

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Проверка ...

Тема: Проверка перед CLng

15.06.2007 21:03:26

All

4316 сообщения

Тема: Проверка перед CLng

Здравствуйте!
Разрешите задать простой вопрос?

Как перед конвертацией в длинное целое (CLng) текстовой строки, проверить что строка не содержит никаких других символов, кроме цифровых символов.

Чтобы избежать ошибки при конвертации.

Спасибо.
Евгений.

P.S. Проблемы с базой данных
Автор: Евгений от 0:00:00 Источник ...

15.06.2007 21:03:26

All

4316 сообщения

RE: Проверка перед CLng

Sub Test()
Dim lngValue As Long
Dim strValue As String
strValue = "qwerty123"
On Local Error Resume Next
lngValue = CLng(Trim(strValue))
If Err.Number <> 0 Then
'действия при ошибке
MsgBox strValue, vbCritical
Else
'все ок
MsgBox lngValue
End If
On Error GoTo 0
'...
End Sub

P.S. Проблемы с базой данных
Автор: N-A от 0:00:00 Источник ...

15.06.2007 21:03:26

All

4316 сообщения

RE: Проверка перед CLng