编程到底是什么

如题所述

编程是编程序的简称,它是为了方便工作,或能够工作而用计算机语言编写程序辅助工作的方式。
举个例子。
㙆 拼音 hong2 有人认识这个字hóng,但不会输入ó,于是用2来表示音调。
如果我想在电脑上写一个程序,识别所有汉字拼音。遇到hong2 感觉很不爽,就想把它们正确转换,这就要编程,编写一个专业转换音调的小程序。
例子:
Sub 音调翻译()
On Error GoTo BB
⊙ = ActiveCell
★ = Right(⊙, 1)
⊙ = Left(⊙, Len(⊙) - 1)
⊙ = Replace(⊙, "v", "ü")
If InStr(⊙, "a") Then ♀ = InStr(⊙, "a"): ♂ = ★ - 1: GoTo BB
If InStr(⊙, "o") Then ♀ = InStr(⊙, "o"): ♂ = ★ + 3: GoTo BB
If InStr(⊙, "e") Then ♀ = InStr(⊙, "e"): ♂ = ★ + 7: GoTo BB
If InStr(⊙, "ui") Then ♀ = InStrRev(⊙, "i"): ♂ = ★ + 11: GoTo BB
If InStr(⊙, "iu") Then ♀ = InStrRev(⊙, "u"): ♂ = ★ + 15: GoTo BB
If InStr(⊙, "i") Then ♀ = InStr(⊙, "i"): ♂ = ★ + 11: GoTo BB
If InStr(⊙, "u") Then ♀ = InStr(⊙, "u"): ♂ = ★ + 15: GoTo BB
If InStr(⊙, "ü") Then ♀ = InStr(⊙, "ü"): ♂ = ★ + IIf(⊙ Like "[jqxy]*", 15, 19)
BB:
v = Split("ā,á,ǎ,à,ō,ó,ǒ,ò,ē,é,ě,è,ī,í,ǐ,ì,ū,ú,ǔ,ù,ǖ,ǘ,ǚ,ǜ", ",")
v = WorksheetFunction.Replace(⊙, ♀, 1, v(♂))
Set ★ = New DataObject
★.SetText v
★.PutInClipboard
Set ★ = Nothing
Application.StatusBar = IIf(Err.Number, "失败", v)
End Sub
这个程序就是编程结果,它可以在选中汉字拼音后,点一下就要excel状态栏显示正常拼音,并且这个拼音也放到了剪贴板中,可以把转换后的拼音粘贴在任何地方。
温馨提示:答案为网友推荐,仅供参考
第1个回答  2020-12-21
第2个回答  2021-04-16

相似回答