// a.writeline("------------------------------")
// a.writeline("时间："&s)
//    MessageBox(sum)
End Sub