中文轉換成拼音函數

 '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''     '中文轉換成拼音函數     Public Function GetChinesePYCode(ByVal SourceStr As String) As String         Dim Serial_S As String    

>>阅读原文<<