怎么把中文轉(zhuǎn)為拼音

1.【怎樣將漢字轉(zhuǎn)換為漢語拼音】

創(chuàng)新互聯(lián)專注于個(gè)舊企業(yè)網(wǎng)站建設(shè),響應(yīng)式網(wǎng)站開發(fā),商城網(wǎng)站建設(shè)。個(gè)舊網(wǎng)站建設(shè)公司,為個(gè)舊等地區(qū)提供建站服務(wù)。全流程定制網(wǎng)站制作，專業(yè)設(shè)計(jì)，全程項(xiàng)目跟蹤，創(chuàng)新互聯(lián)專業(yè)和態(tài)度為您提供的服務(wù)

那你就要學(xué)好普通話了，因?yàn)閷?shí)在是太復(fù)雜了漢語拼音是由聲母、韻母和聲調(diào)組成的.聲調(diào)：有四聲（陰平（第一聲）、陽平（第二聲）、上聲（第三聲）、去聲（第四聲））聲母：二十三個(gè)（b p m f d t n l g k h j q x zh ch sh r z c s y(i) w(u)）韻母：a o e ê i u ü ai ei ao ou an en ang eng ong ua uo uai ui(uei) uan un(uen) uang ueng ü üi（üei） üan ün（üen）。

2.漢字如何迅速轉(zhuǎn)換成拼音

1、把你要注拼音的漢字、詞組或者段落，甚至是一小篇文章輸入在WORD文檔中；

2、選擇你要標(biāo)注上拼音的漢字；

3、點(diǎn)擊文檔菜單的“格式”，在其下拉菜單中點(diǎn)擊“中文版式”，然后選擇“拼音指南”；

4、在“拼音指南”的對(duì)話框中選擇“確定”。

注意，這種方法一次只能為40個(gè)漢字字符標(biāo)注拼音.如果你想給不短的文章標(biāo)注拼音，就只能一段一段的標(biāo)注了，否則你就要安裝標(biāo)注拼音的小軟件. 補(bǔ)充： 在WORD選中擬加拼音的文字，點(diǎn)“格式/中文版式/拼音指南”，選擇好對(duì)齊方式、字體、字號(hào)，預(yù)覽滿意后，點(diǎn)“組合/確定”即可。

3.漢字如何迅速轉(zhuǎn)換成拼音

1、把你要注拼音的漢字、詞組或者段落，甚至是一小篇文章輸入在WORD文檔中； 2、選擇你要標(biāo)注上拼音的漢字； 3、點(diǎn)擊文檔菜單的“格式”，在其下拉菜單中點(diǎn)擊“中文版式”，然后選擇“拼音指南”； 4、在“拼音指南”的對(duì)話框中選擇“確定”。

注意，這種方法一次只能為40個(gè)漢字字符標(biāo)注拼音.如果你想給不短的文章標(biāo)注拼音，就只能一段一段的標(biāo)注了，否則你就要安裝標(biāo)注拼音的小軟件. 補(bǔ)充： 在WORD選中擬加拼音的文字，點(diǎn)“格式/中文版式/拼音指南”，選擇好對(duì)齊方式、字體、字號(hào)，預(yù)覽滿意后，點(diǎn)“組合/確定”即可。

4.EXCEL中能否直接把中文轉(zhuǎn)換成拼音

網(wǎng)上找的，我自己沒測(cè)試。

讓人加分不厚道，助人為樂快樂之本 打開Excel-工具-宏-Viaual Basic編輯器 在彈出來的窗口中對(duì)著VBAproject點(diǎn)右鍵-插入-模塊 下面會(huì)出現(xiàn)一個(gè)名為"模塊1"，點(diǎn)擊 在右邊的空白欄中粘貼以下內(nèi)容：'''''''''''''''''''''''VBscript代碼提供者：小白'聯(lián)系方法：'E-mail:xiaobai@17560''VBA代碼轉(zhuǎn)換者：惟惟'聯(lián)系方法：Email:wuweiyin@yeah'個(gè)人博客：'如有不正確的地方，請(qǐng)?zhí)岢鰜砘蚴菐兔ν晟?謝謝'''''''''''''''''''''''''''''' Function getpychar(char) tmp = 65536 + Asc(char) If (tmp = 45217 And tmp getpychar = "A" ElseIf (tmp = 45253 And tmp getpychar = "B" ElseIf (tmp = 45761 And tmp getpychar = "C" ElseIf (tmp = 46318 And tmp getpychar = "D" ElseIf (tmp = 46826 And tmp getpychar = "E" ElseIf (tmp = 47010 And tmp getpychar = "F" ElseIf (tmp = 47297 And tmp getpychar = "G" ElseIf (tmp = 47614 And tmp getpychar = "H" ElseIf (tmp = 48119 And tmp getpychar = "J" ElseIf (tmp = 49062 And tmp getpychar = "K" ElseIf (tmp = 49324 And tmp getpychar = "L" ElseIf (tmp = 49896 And tmp getpychar = "M" ElseIf (tmp = 50371 And tmp getpychar = "N" ElseIf (tmp = 50614 And tmp getpychar = "O" ElseIf (tmp = 50622 And tmp getpychar = "P" ElseIf (tmp = 50906 And tmp getpychar = "Q" ElseIf (tmp = 51387 And tmp getpychar = "R" ElseIf (tmp = 51446 And tmp getpychar = "S" ElseIf (tmp = 52218 And tmp getpychar = "T" ElseIf (tmp = 52698 And tmp getpychar = "W" ElseIf (tmp = 52980 And tmp getpychar = "X" ElseIf (tmp = 53689 And tmp getpychar = "Y" ElseIf (tmp = 54481 And tmp getpychar = "Z" Else '如果不是中文，則不處理 getpychar = char End If End Function Function getpy(str) For i = 1 To Len(str) getpy = getpy getpychar(Mid(str, i, 1)) Next i End Function********復(fù)制到此結(jié)束，本行不復(fù)制******* 現(xiàn)在轉(zhuǎn)換函數(shù)已編寫完成！關(guān)掉此編緝的窗口。要在Excel中使用，方法如下：A1 A2 中國 =getpy(A1)。

如何用vb.net將漢字轉(zhuǎn)換成拼音阿

public string hz2py(string hz) //獲得漢字的區(qū)位碼

{

byte[] sarr = System.Text.Encoding.Default.GetBytes(hz);

int len = sarr.Length;

if (len1)

{

byte[] array = new byte[2];

array = System.Text.Encoding.Default.GetBytes(hz);

int i1 = (short)(array[0] - '\0');

int i2 = (short)(array[1] - '\0');

//unicode解碼方式下的漢字碼

// array = System.Text.Encoding.Unicode.GetBytes(hz);

// int i1 = (short)(array[0] - '\0');

// int i2 = (short)(array[1] - '\0');

// int t1 = Convert.ToInt32(i1,16);

// int t2 = Convert.ToInt32(i2,16);

int tmp=i1*256+i2;

string getpychar="*";//找不到拼音碼的用*補(bǔ)位

if(tmp=45217tmp=45252){getpychar= "A";}

else if(tmp=45253tmp=45760){getpychar= "B";}

else if(tmp=47761tmp=46317){getpychar= "C";}

else if(tmp=46318tmp=46825){getpychar= "D";}

else if(tmp=46826tmp=47009){getpychar= "E";}

else if(tmp=47010tmp=47296){getpychar= "F";}

else if(tmp=47297tmp=47613){getpychar= "G";}

else if(tmp=47614tmp=48118){getpychar= "H";}

else if(tmp=48119tmp=49061){getpychar= "J";}

else if(tmp=49062tmp=49323){getpychar= "K";}

else if(tmp=49324tmp=49895){getpychar= "L";}

else if(tmp=49896tmp=50370){getpychar= "M";}

else if(tmp=50371tmp=50613){getpychar= "N";}

else if(tmp=50614tmp=50621){getpychar= "O";}

else if(tmp=50622tmp=50905){getpychar= "P";}

else if(tmp=50906tmp=51386){getpychar= "Q";}

else if(tmp=51387tmp=51445){getpychar= "R";}

else if(tmp=51446tmp=52217){getpychar= "S";}

else if(tmp=52218tmp=52697){getpychar= "T";}

else if(tmp=52698tmp=52979){getpychar= "W";}

else if(tmp=52980tmp=53640){getpychar= "X";}

else if(tmp=53689tmp=54480){getpychar= "Y";}

else if(tmp=54481tmp=55289){getpychar= "Z";}

return getpychar;

}

else

{

return hz;

}

}

public string transpy(string strhz) //把漢字字符串轉(zhuǎn)換成拼音碼

{

string strtemp="";

int strlen=strhz.Length;

for (int i=0;i=strlen-1;i++)

{

strtemp+=hz2py(strhz.Substring(i,1));

}

return strtemp;

}

create table tabpy(id int identity,b_begin varbinary(2),b_end varbinary(2),word varchar(2))

insert tabpy select 0xB0A1, 0xB0C4,'A'

union all select 0xB0C5, 0xB2C0,'B'

union all select 0xB2C1, 0xB4ED,'C'

union all select 0xB4EE, 0xB6E9,'D'

union all select 0xB6EA, 0xB7A1,'E'

union all select 0xB7A2, 0xB8C0,'F'

union all select 0xB8C1, 0xB9FD,'G'

union all select 0xB9FE, 0xBBF6,'H'

union all select 0xBBF7, 0xBFA5,'J'

union all select 0xBFA6, 0xC0AB,'K'

union all select 0xC0AC, 0xC2E7,'L'

union all select 0xC2E8, 0xC4C2,'M'

union all select 0xC4C3, 0xC5B5,'N'

union all select 0xC5B6, 0xC5BD,'O'

union all select 0xC5BE, 0xC6D9,'P'

union all select 0xC6DA, 0xC8BA,'Q'

union all select 0xC8BB, 0xC8F5,'R'

union all select 0xC8F6, 0xCBF9,'S'

union all select 0xCBFA, 0xCDD9,'T'

union all select 0xCDDA, 0xCEF3,'W'

union all select 0xCEF4, 0xD1B8,'X'

union all select 0xD1B9, 0xD4D0,'Y'

union all select 0xD4D1, 0xD7F9,'Z'

函數(shù)：

create function getfirstpy(@a varchar(200))

returns varchar(100)

as

begin

declare @i int,@j int,@result varchar(100)

set @result=''

set @i=len(@a)

set @j=1

while @j=@i

begin

select @result=@result+word from tabpy where cast(substring(@a,@j,1) as varbinary(2)) between b_begin and b_end

set @j=@j+1

end

return @result

end

用vb如何實(shí)現(xiàn)將漢字轉(zhuǎn)換成拼音

360問答

vb6.0怎樣實(shí)現(xiàn)漢字的拼音如text1輸入“拼音”就msgbox(pinyin)

lpnwk LV12

2013-07-01

滿意答案

husky0114

LV11

2013-07-02

我自己做了一個(gè)ocx'控件，可以輸入一大段中文后可輸出它的拼音，但前提是電腦可以聯(lián)網(wǎng) 調(diào)用方式 Private Sub Command1_Click() py1.輸入字符 = "你想要的文字" MsgBox py1.輸出字符 End Sub 控件下載地址我發(fā)給你，注意到百度信息里查收

VB.NET中怎么實(shí)現(xiàn) 漢字轉(zhuǎn)換拼音呢

建立一個(gè)表，每個(gè)拼音都跟多個(gè)漢字對(duì)應(yīng)?？梢酝ㄟ^漢字，找出對(duì)應(yīng)的一個(gè)拼音，也可以通過拼音，找出一堆漢字。