msg = Array("解除電話 #57#", "服務器處理", "流量圖看有沒有大流量", "今天要完成哪些任務")    
'msgbox join(msg,vbcrlf)    
For i = 0 To UBound(msg)    
    MsgBox msg(i)    
Next