5个回答
展开全部
两个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
如果你能搞到数据库的话就容易多了,直接用数据库查询的方法就行了
参考代码
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
如果你能搞到数据库的话就容易多了,直接用数据库查询的方法就行了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
代码有点长(16kb).贴不上来.楼主留下QQ或邮箱过几天发给你.(20号左右,这几天忙)
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2008-09-11
展开全部
什么意思啊???????????????????????????????
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
那是很大的工程,得用一个很大的数据库
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
这肯定不是简单就能弄出来的
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询