如何用VB编翻译程序(数字翻译程序是什么)
如何用VB编翻译程序(数字翻译程序是什么)
我建议使用text文件，汉字之间不用分隔符，不分行，直接按照你的顺序放进去就好了（但注意，不能乱顺序，不能少字！）
然后使用下面的代码。
Const 标题 = "代码翻译成汉字"
Dim 汉字表 As String
Private Sub Command1_Click()
Dim 代码 As Integer
'排除错误的输入
If Not IsNumeric(Text1) Then 'text内容不是数字
MsgBox "你输入的不是十进制代码！" vbCrLf "请重新输入。", vbCritical, 标题
Text1 = ""
Exit Sub
End If
If Len(Text1) 4 Then '代码太长
MsgBox "你输入代码太长！" vbCrLf "请重新输入。", vbCritical, 标题
Text1 = ""
Exit Sub
End If
代码 = Int(Text1)
If 代码 9999 Or 代码 0 Then '超出范围
MsgBox "你输入代码没有对应的汉字！有效代码0~9999" vbCrLf "请重新输入。", vbCritical, 标题
Text1 = ""
Exit Sub
End If
'其他的输入错误我不知道还会有什么？你自己加在这里
Text2 = Mid(汉字表, 代码 + 1, 1) '唉，有效代码就是这一行！其他都是陪衬
End Sub
Private Sub Form_Load()
'界面安排
Command1.Caption = "翻译"
Text1 = ""
Text2 = ""
Text1.Move 300, 600, 1000, 500
Text2.Move 1500, 600, 1000, 500
Command1.Move 900, 1500, 1000, 500
Height = 3500
Width = 2900
Caption = 标题
'读入汉字表
Open App.Path "\汉字表.txt" For Input As #1
Input #1, 汉字表
Close #1
End Sub
Private Sub Text1_Change()
Text2 = ""
End Sub
翻译程序是指将用某种语言编写的程序转换成另一种语言形式的程序的程序，如编译程序和汇编程序等。
编译程序是把用高级语言编写的源程序转换（加工）成与之等价的另一种用低级语言编写的目标程序的翻译程序。
解释程序是解释、执行高级语言源程序的程序。
你说的这种只有把字转换成二进制了，，如果其他正常牛逼的翻译软件，推荐transmate翻译软件
编译程序:把用高级程序设计语言书写的源程序，翻译成等价的计算机汇编语言或机器语言的目标程序的翻译程序。
解释程序是高级语言翻译程序的一种，它将源语言(如BASIC)书写的源程序作为输入，解释一句后就提交计算机执行一句，并不形成目标程序。
编译程序和解释程序都是翻译程序。
我觉得你说的书上的定义有点问题
在整个翻译项目过程中，主要涉及到三个程序：译前准备、译中问题解决及译后整理和校对。
1、译前准备主要为文本分析、平行文本的搜索、翻译方案的制定。
2、翻译的过程即发现问题并解决问题的过程。主要包括文本层面及非文本层面的问题。
3、译后阶段则是对译文进行审校、修改整理译文格式、提交最终译文，以及对翻译项目进行总结。
更多关于翻译程序包括什么，进入：查看更多内容
