Private Declare Function icePub_dictionaryCodeTransfer Lib "icePubDll.dll" (ByVal strDictionaryFilename As String,ByVal strSrc As String,ByVal strCode As String) As Integer
Dim a2 As Integer
Dim strCode As String
strCode=Space(1024)
a2=icePub_dictionaryCodeTransfer("拼音字典.txt","李世明",strCode)
MsgBox strCode
拼音字典.txt內容如下
李世明LI SHI MING
張三ZHANG SAN
/dev.php?f=icePubDll.rar 下載
上一篇:運行壹個小程序需要下載 .NET Framework 3.5下一篇:如何將動網論壇的dispbbs.asp改為其它文件名?