| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _按钮1_被单击 | |||||
编辑框3.内容 ＝ 进制转换 (编辑框1.内容, 16, 8)
编辑框4.内容 ＝ 进制转换 (编辑框1.内容, 16, 10)
编辑框5.内容 ＝ 进制转换 (编辑框1.内容, 16, 16)
编辑框6.内容 ＝ 进制转换 (编辑框1.内容, 16, 32)
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| 进制转换 | 文本型 | ||||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 被转换文本 | 文本型 | 被转换进制 | 整数型 | 转换的进制 | 整数型 | ||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 计次变量 | ||||||
| 临时数值 | ||||||
| 欲转换文本 | 文本型 | |||||
如果真 (被转换进制 ＝ 转换的进制)
返回 (被转换文本)
计次循环首 (取文本长度 (被转换文本), 计次变量) ' 整数转换开始临时数值 ＝ (寻找文本 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 取文本中间 (被转换文本, 计次变量, 1), , 真) － 1) × 求次方 (被转换进制, 取文本长度 (被转换文本) － 计次变量) ＋ 临时数值
计次循环尾 ()
判断循环首 (临时数值 ＞ 转换的进制 － 1)欲转换文本 ＝ 取文本中间 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 到数值 (到文本 (临时数值 ％ 转换的进制)) ＋ 1, 1) ＋ 欲转换文本临时数值 ＝ 取整 (临时数值 ÷ 转换的进制)判断循环尾 ()欲转换文本 ＝ 取文本中间 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 临时数值 ＋ 1, 1) ＋ 欲转换文本 ' 整数转换结束
返回 (欲转换文本)
，