Числа с продвижением обнуляют, с помощью vb6

Как я могу добавить, что продвижение обнуляет к числу? Например:

Dim stracctnumber as String
stracctnumber = 987654321

Если stracctnumber меньше чем 15 символов, затем добавьте, что продвижение обнуляет к номеру аккаунта.

Заключительное число должно быть

stracctnumber = "000000987654321"

Кто-либо может помочь мне?

5
задан Deanna 2 April 2013 в 11:01
поделиться

2 ответа

stracctnumber = Format(stracctnumber, String(15, "0"))
12
ответ дан 18 December 2019 в 13:15
поделиться
strAcct = Right("000000000000000" & strAcct, 15)

Обратите внимание, что объединение относительно «дорого». Если это только для отображения, а не для изменения базового значения, рассмотрите возможность использования функции Format () .

3
ответ дан 18 December 2019 в 13:15
поделиться
Другие вопросы по тегам:

Похожие вопросы: