漢字轉拼音縮寫的函式(vb)
public
function
getpychar(char
asstring
) as
string
dimlchar
aslong
lchar
=65536
+asc
(char)
if(lchar
>=
45217
andlchar
<=
45252
) then
getpychar ="
a"
if(lchar
>=
45253
andlchar
<=
45760
) then
getpychar ="
b"
if(lchar
>=
47761
andlchar
<=
46317
) then
getpychar ="
c"
if(lchar
>=
46318
andlchar
<=
46825
) then
getpychar ="
d"
if(lchar
>=
46826
andlchar
<=
47009
) then
getpychar ="
e"
if(lchar
>=
47010
andlchar
<=
47296
) then
getpychar ="
f"
if(lchar
>=
47297
andlchar
<=
47613
) then
getpychar ="
g"
if(lchar
>=
47614
andlchar
<=
48118
) then
getpychar ="
h"
if(lchar
>=
48119
andlchar
<=
49061
) then
getpychar ="
j"
if(lchar
>=
49062
andlchar
<=
49323
) then
getpychar ="
k"
if(lchar
>=
49324
andlchar
<=
49895
) then
getpychar ="
l"
if(lchar
>=
49896
andlchar
<=
50370
) then
getpychar ="
m"
if(lchar
>=
50371
andlchar
<=
50613
) then
getpychar ="
n"
if(lchar
>=
50614
andlchar
<=
50621
) then
getpychar ="
o"
if(lchar
>=
50622
andlchar
<=
50905
) then
getpychar ="
p"
if(lchar
>=
50906
andlchar
<=
51386
) then
getpychar ="
q"
if(lchar
>=
51387
andlchar
<=
51445
) then
getpychar ="
r"
if(lchar
>=
51446
andlchar
<=
52217
) then
getpychar ="
s"
if(lchar
>=
52218
andlchar
<=
52697
) then
getpychar ="
t"
if(lchar
>=
52698
andlchar
<=
52979
) then
getpychar ="
w"
if(lchar
>=
52980
andlchar
<=
53640
) then
getpychar ="
x"
if(lchar
>=
53689
andlchar
<=
54480
) then
getpychar ="
y"
if(lchar
>=
54481
andlchar
<=
52289
) then
getpychar ="
z"
end function
public
function
getpy(str
asstring
) as
string
fori =0
tolen
(str) -1
getpy
=getpy
&getpychar(
mid(str, i +1
, 1
))next
end function
漢字轉拼音縮寫的函式 C
原文 漢字轉拼音縮寫的函式 c 在csdn上找了一下,沒有找一完整的轉換函式,特在前人基礎上整理了一下,接下來的專案中有可能用到。感謝bugfree 八個飛飛 漢字轉拼音縮寫 code by musestudio hotmail.com 2004 11 30 summary 要轉換的漢字字串 ret...
漢字轉拼音縮寫的函式 C
這個是從網上轉過來的漢字轉拼音縮寫的函式,有時候這樣的程式還是很有用處的,不過不知道原理是什麼,所以用起來還是不怎麼放心哦 漢字轉拼音縮寫的函式 c 在csdn上找了一下,沒有找一完整的轉換函式,特在前人基礎上整理了一下,接下來的專案中有可能用到。感謝bugfree 八個飛飛 漢字轉拼音縮寫 cod...
漢字轉拼音縮寫的函式 C
剛剛整理好 漢字轉拼音縮寫的函式 c 在csdn上找了一下,沒有找一完整的轉換函式,特在前人基礎上整理了一下,接下來的專案中有可能用到。感謝bugfree 八個飛飛 漢字轉拼音縮寫 code by musestudio hotmail.com 2004 11 30 要轉換的漢字字串 拼音縮寫 pub...
漢字轉拼音縮寫的函式 C
這個是從網上轉過來的漢字轉拼音縮寫的函式,有時候這樣的程式還是很有用處的,不過不知道原理是什麼,所以用起來還是不怎麼放心哦 原文 剛剛整理好 漢字轉拼音縮寫的函式 c 在csdn上找了一下,沒有找一完整的轉換函式,特在前人基礎上整理了一下,接下來的專案中有可能用到。感謝bugfree 八個飛飛 漢字...
漢字轉拼音縮寫的函式 C
這個是從網上轉過來的漢字轉拼音縮寫的函式,有時候這樣的程式還是很有用處的,不過不知道原理是什麼,所以用起來還是不怎麼放心哦 原文 剛剛整理好 漢字轉拼音縮寫的函式 c 在csdn上找了一下,沒有找一完整的轉換函式,特在前人基礎上整理了一下,接下來的專案中有可能用到。感謝bugfree 八個飛飛 漢字...