msg = Array("解除电话 #57#", "服务器处理", "流量图看有没有大流量", "今天要完成哪些任务")
'msgbox join(msg,vbcrlf)
For i = 0 To UBound(msg)
MsgBox msg(i)
Next