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