преобразование текстового поля в числовое

kobra
Дата: 21.11.2006 09:17:18
привет.
подскажите. как быть.
У меня есть форма(табл.1) при сохранении которой данные переносятся в др.форму(табл.2). Но проблема в том, что там есть поле № договора. если в табл.1 уже проставлен этот номер, то он переносится в табл.2, если же его нет, то должна быть сквозная нумерация(для этого у меня есть табл.Договор, из которой и должно раться это значение). Все понятно, если номера только числовые, но формат поля текстовый, т.к. номер может состоять как из цыфр, так и из букв. Так вот, мне надо, если в табл.1 номер договора не проставлен, брать его из табл.Договор, при этом. сначала преобразовать его надо в числовое значение, чтобы потом прибавить 1, и снова сохранить в табл.Договор в текстовом формате.
mds_world
Дата: 21.11.2006 09:26:24
Преобразование текстового представления цифр в число, например, функция CInt, если целые, как у вас, видимо. Обратное преобразование - CStr.
Но не может быть, что в табл.Договор, или введенные номера договоров из формы, содержат не цифровые символы? Тогда нужна более сложная обработка.
Alexander G
Дата: 21.11.2006 09:27:55
Dim a As String
Dim b As Integer
a = "12a"
b = Val(a) + 1
a = Str(b)
Debug.Print a
kobra
Дата: 21.11.2006 09:32:02
Alexander G
Dim a As String
Dim b As Integer
a = "12a"
b = Val(a) + 1
a = Str(b)
Debug.Print a


а что такое а и b?
не совсем поняла.
Alexander G
Дата: 21.11.2006 09:39:58
Хм.
Переменные:)

Основам программирования вроде и в школах сейчас учат.
Alexander G
Дата: 21.11.2006 09:56:28
но функция Val вернет число только в случае если цифры впереди, к примеру, "a12" уже не пройдет
kobra
Дата: 21.11.2006 09:59:27
у меня в табл.Договор(от куда берется сквозная нумерация) только числа. А буквенное значение может быть, если только поставять сами.