VB中汉字转拼音的代码

代码有点长(16kb).贴不上来.楼主留下QQ或邮箱过几天发给你.(20号左右,这几天忙)

两个Textbos(Text1和Text2），一个CommandButton(Command1)

参考代码

Private Sub Command1_Click()
With Text2
Select Case Text1.Text
Case "你"
.Text = "ni"
Case "好"
.Text = "hao"
Case "吗"
.Text = "ma"
Case "今"
.Text = "jin"
'……剩下的自己写吧
'很巨大的工程
End Select
End With
End Sub

如果你能搞到数据库的话就容易多了，直接用数据库查询的方法就行了

那是很大的工程,得用一个很大的数据库

这肯定不是简单就能弄出来的

什么意思啊？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？