VB6.0实现12/24小时时间格式转换