Replace函数的一个小应用

看了千千静听设置里面的自动读取MP3的TAG信息。
例如 %Author - %Title 是显示成 作者 - 标题
其实这个方法很简单。只需要用Replace就可以了。

Dim m_Title As String
Dim NewTitle As String
m_Title="%Author - %Title"
NewTitle=Replace(m_Title, "%Author", "作者")
NewTitle=Replace(m_Title, "%Title", "标题")
....
很简单，见笑。。。