jayanthik Ответов: 1

Получить первые 5 цифр из длинного типа данных в vb6

как получить первые 5 цифр из длинного типа данных в vb6.
Я храню свои данные в варианте

Что я уже пробовал:

Я пытаюсь использовать функцию left$ , но не могу ее получить

Suvendu Shekhar Giri

Убедитесь, что вы преобразовали его в строку, прежде чем использовать функцию left$.

1 Ответов

Рейтинг:
2

CHill60

Вам придется проверить синтаксис этого, потому что я не устанавливаю VB6 только для этого (или для чего-то еще, если честно).

Dim along As Variant
along = 123549512
Dim longAsString As String
longAsString = CStr$(long)
Dim res as String
res = Left$(longAsString, 5)


[Отредактировано для изменения Str$ к CStr$ . первое включает в себя пробел для знака числа, второе-нет. В качестве альтернативы можно было бы взять строку из 2-го символа, но это не так ясно)

[Отредактировано, чтобы исправить синтаксическую ошибку с Left$ spotted и исправлено @RichardDeeming-спасибо]

Richard Deeming

Если не ошибаюсь, в Left функция принимает только два аргумента: строку и количество возвращаемых символов. Так и должно быть: 

res = Left$(longAsString, 5)

CHill60

Овации... Вместо этого я использовал синтаксис для Mid$. Я исправлю ошибку.