字母对应转化为数字

杨同学

A对应1,B对应2，C对应3，就是字母转化为数字，按照顺序，有没有命令或者哪位有写好的求一份

福仔

  

子程序名	返回值类型	公开	备 注
字母到数字	整数型
参数名	类 型	参考	可空	数组	备 注
字母	文本型

返回 (取代码 (字母, ) － 取代码 (“A”, ) ＋ 1)

.版本 2<br /> <br /> .子程序 字母到数字, 整数型<br /> .参数 字母, 文本型<br /> <br /> 返回 (取代码 (字母, ) － 取代码 (“A”, ) ＋ 1)

初夏喔

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

调试输出 (字母到数字 (“C”))
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
字母到数字	整数型
参数名	类 型	参考	可空	数组	备 注
字母	文本型

变量名	类 型	静态	数组	备 注
字母表	文本型		0
i	整数型

字母表 ＝ { “A”, “B”, “C”, “D”, “E”, “F”, “G”, “H”, “I”, “J”, “K”, “L”, “M”, “N”, “O”, “P”, “Q”, “R”, “S”, “T”, “U”, “V”, “W”, “X”, “Y”, “Z” }
计次循环首 (取数组成员数 (字母表), i)
如果真 (字母表 [i] ＝ 到大写 (字母))
返回 (i)

计次循环尾 ()
返回 (0)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> <br /> 调试输出 (字母到数字 (“C”))<br /> <br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 字母到数字, 整数型<br /> .参数 字母, 文本型<br /> .局部变量 字母表, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 字母表 ＝ { “A”, “B”, “C”, “D”, “E”, “F”, “G”, “H”, “I”, “J”, “K”, “L”, “M”, “N”, “O”, “P”, “Q”, “R”, “S”, “T”, “U”, “V”, “W”, “X”, “Y”, “Z” }<br /> .计次循环首 (取数组成员数 (字母表), i)<br />     .如果真 (字母表 <i> ＝ 到大写 (字母))<br />         返回 (i)<br />     .如果真结束<br /> .计次循环尾 ()<br /> 返回 (0)

wgx7450

取代码 (到大写 (“a”), ) － 64

wtflxk

[/e=1]
.版本 2

.子程序 序列取文本, 文本型
.参数 序号, 整数型, , 1-25
.局部变量 i

.变量循环首 (65, 90, 1, i)
    .如果真 (序号 ＝ i － 65)
        返回 (字符 (i))
    .如果真结束

.变量循环尾 ()
返回 (字符 (0))


.子程序 文本到整数, 整数型
.参数 文本, 文本型, , A-Z
.局部变量 i

.变量循环首 (65, 90, 1, i)
    .如果真 (到大写 (文本) ＝ 字符 (i))
        返回 (i － 64)
    .如果真结束

.变量循环尾 ()
返回 (0)



[/e]