文本和字节集数据互相转换的代码
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
|
.版本 2.程序集 窗口程序集1.子程序 文本到字节集, 文本型, 公开.参数 要转换的文本, 文本型.局部变量 字节集变量, 字节集.局部变量 循环次数, 整数型.局部变量 字节型变量, 字节集.局部变量 要输出的文本, 文本型.局部变量 文本数据, 文本型文本数据 ＝ 要转换的文本字节集变量 ＝ 到字节集 (文本数据).计次循环首 (取字节集长度 (字节集变量), 循环次数) 字节型变量 ＝ 取字节集中间 (字节集变量, 循环次数, 1) .如果 (循环次数 ＜ 取字节集长度 (字节集变量)) 要输出的文本 ＝ 要输出的文本 ＋ 到文本 (取字节集数据 (字节型变量, #字节型, )) ＋ “,” .否则 要输出的文本 ＝ 要输出的文本 ＋ 到文本 (取字节集数据 (字节型变量, #字节型, )) .如果结束.计次循环尾 ()返回 (要输出的文本).子程序 字节集到文本, 文本型, 公开, 数据必须以“,”分割，且无｛｝.参数 要转换的文本型数据, 文本型, , 数据必须以“,”分割，且无｛｝.局部变量 循环次数, 整数型.局部变量 整数数组, 整数型, , "0".局部变量 文本数组, 文本型, , "0".局部变量 文本数据, 文本型文本数据 ＝ 要转换的文本型数据文本数组 ＝ 分割文本 (文本数据, “,”, ).计次循环首 (取数组成员数 (文本数组), 循环次数) 加入成员 (整数数组, 到整数 (文本数组 [循环次数])).计次循环尾 ()返回 (到文本 (子字节集替换 (到字节集 (整数数组), { 0 }, { }, , ))).子程序 字节集型文本到字节集, 字节集, 公开, 数据必须以“,”分割，且无｛｝.参数 要转换的文本型数据, 文本型, , 数据必须以“,”分割，且无｛｝.局部变量 循环次数, 整数型.局部变量 整数数组, 整数型, , "0".局部变量 文本数组, 文本型, , "0".局部变量 文本数据, 文本型文本数据 ＝ 要转换的文本型数据文本数组 ＝ 分割文本 (文本数据, “,”, ).计次循环首 (取数组成员数 (文本数组), 循环次数) 加入成员 (整数数组, 到整数 (文本数组 [循环次数])).计次循环尾 ()返回 (子字节集替换 (到字节集 (整数数组), { 0 }, { }, , )).子程序 _文本到字节集按钮_被单击字节集编辑框.内容 ＝ 文本到字节集 (文本编辑框.内容).子程序 _字节集转换文本按钮_被单击文本编辑框.内容 ＝ 字节集到文本 (字节集编辑框.内容) |
运行结果：
总结
以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对服务器之家的支持。如果你想了解更多相关内容请查看下面相关链接
