時間函數之timetostring

說明：	此函數將時間轉為字串格式，格式是"hh:mm:ss AM/PM" hh:12小時制小時 mm:分 ss:秒 AM上午 PM下午
語法：	TimeToString(MyTime)
輸入：	時間〈數值〉：HHmmss時間
輸出：	字串