нужно направление на написание пользовательского DATETIME форматирования в VB6

Question

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

A -DDD HH:MM:SS 

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

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

HH:MM ss 

Как бы вы приближаетесь форматирования это?

ямайских

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 в минуту здесь)