Нужно руководство по написанию пользовательского формата даты и времени в VB6

Question

У меня есть строка:

A -DDD HH:MM:SS

, и в настоящее время я пытаюсь написать функцию, которая будет принимать эту строку, а также формат для ее преобразования.Например, скажем, я хотел отобразить только HH: MM ss (Часы с ведущими нулями + двоеточие + Минуты с ведущими нулями + без двоеточий + секунды без лидирующих нулей.

Я понимаю, что для VB6 вы, вероятно, будете использоватьстроковая функция, такая как Mid (str, int, int), чтобы получить часть времени. Но если я создам пользовательский формат

HH:MM ss

Как бы вы подошли к форматированию этого?

J

Answer 1

Отрежьте строго отформатированную часть времени и используйте функцию форматирования;

s = "A -??? 12:34:56"
t = right$(s,8)

?format$(t, "HH:NN ss")
12:34 56

?format$(t, "HH:NN ss AM/PM")
12:34 56 PM

?format$(t, "H, N, S  AM/PM")
12, 34, 56  PM

(здесь N минута)