
编译执行:把源程序翻译成机器语言(生成可执行文件,比如com或exe文件),然后
执行。(包含汇编和链接两个过程)
解释执行:把一行源程序翻译成机器语言,然后执行;再翻译下一行源程序成机
器语言,然后执行。(翻译一句,执行一次。不生成可执行文件)
A)连接程序编辑程序:生成源代码文件解释程序:对源程序边解释翻译成机器代码边执行的高级语言程序编译程序:将程序的源代码转为机器码的形式,也称为目标代码,但不能直接执行连接程序:将目标代码和库文件连接成exe可执行程序
我建议使用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()
'界面安排
Command1Caption = "翻译"
Text1 = ""
Text2 = ""
Text1Move 300, 600, 1000, 500
Text2Move 1500, 600, 1000, 500
Command1Move 900, 1500, 1000, 500
Height = 3500
Width = 2900
Caption = 标题
'读入汉字表
Open AppPath & "\汉字表txt" For Input As #1
Input #1, 汉字表
Close #1
End Sub
Private Sub Text1_Change()
Text2 = ""
End Sub
以上就是关于翻译高级语言编写的源程序,采用的两种方法全部的内容,包括:翻译高级语言编写的源程序,采用的两种方法、将高级语言编写的程序翻译成机器语言程序采用什么翻译方式、如何用VB编翻译程序等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)