递归火山软件开发平台

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
热搜: 火山 源码 类库
查看: 51|回复: 0
打印 上一主题 下一主题

[视窗] 字符数组的使用、字母和数字ASCII编码转换、循环

[复制链接]

3

主题

12

帖子

74

积分

注册会员

Rank: 2

积分
74
QQ
跳转到指定楼层
楼主
发表于 昨天 18:35 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
<火山程序 类型 = "通常" 版本 = 1 />

方法 按钮_被单击 <接收事件 类型 = 整数 注释 = "当按钮被单击后发送此事件">
参数 来源对象 <类型 = 按钮 注释 = "提供事件产生的具体来源对象">
参数 标记值 <类型 = 整数 注释 = "用户调用\"挂接事件\"命令时所提供的\"标记值\"参数值,非此方式挂接事件则本参数值固定为0.">
{
    变量 字符数组1_固定_初始值 <类型 = "字符 []" 值 = {'A','B','C','D','E'} 注释 = "用初始值定义固定成员数数组变量">
    变量 字符数组2_固定_成员数 <类型 = "字符 [5]" 注释 = "用成员数固定成员数数组变量">
    变量 字符数组3_不固定_数组类 <类型 = 字符数组类 注释 = "用数组类定义成员数未知的字符数组">
    // 数组变量的定义方式有两种:一种是已知成员数量;另一种是成员数未知

    // 下面是测试已知成员数 字符数组 ,用初始值定义
    编辑框1.内容 = 编辑框1.内容 + "\r\n" + "下面输出字符数组1的信息:"
    编辑框1.内容 = 编辑框1.内容 + "\r\n" + "成员数:" + 到文本 (取数组成员数 (字符数组1_固定_初始值))
    变量 输出文本 <类型 = 文本型>

    计次循环 (取数组成员数 (字符数组1_固定_初始值))
    {
        输出文本 = 输出文本 + 到文本 (字符数组1_固定_初始值 [取循环索引 ()])

    }
    编辑框1.内容 = 编辑框1.内容 + "\r\n" + "成员:" + 输出文本
    // 下面是测试已知成员数 字符数组 ,用变量定义
    编辑框1.内容 = 编辑框1.内容 + "\r\n" + "下面输出字符数组2的信息:"
    变量 字符码 <类型 = 整数>
    变量 字符_ <类型 = 字符>
    字符码 = (整数)'A'  // 将字符A强制转换为整数,就是得到字符Aascii值

    计次循环 (5)  // ABCDE 这5个字符的字符码各相差1 用循环将这5个字符的码计算得出,将码值强转为字符,将字符赋值给对应的数组
    {
        字符_ = (字符)(字符码 + 取循环索引 ())  // 根据字符A的字符码值分别计算出BCDE四个字符码值,并将码值强转为字符
        字符数组2_固定_成员数 [取循环索引 ()] = 字符_  // 将字符ABCDE分别赋值给数组对应位置

    }

    编辑框1.内容 = 编辑框1.内容 + "\r\n" + "成员数:" + 到文本 (取数组成员数 (字符数组2_固定_成员数))

    输出文本 = ""  // 初始化变量为空
    计次循环 (取数组成员数 (字符数组2_固定_成员数))
    {
        输出文本 = 输出文本 + 到文本 (字符数组2_固定_成员数 [取循环索引 ()])

    }
    编辑框1.内容 = 编辑框1.内容 + "\r\n" + "成员:" + 输出文本
    输出文本 = ""
    // 下面是测试未知成员数 字符数组
    字符数组3_不固定_数组类.加入成员 ('A')
    字符数组3_不固定_数组类.加入成员 ('B')
    字符数组3_不固定_数组类.加入成员 ('C')
    字符数组3_不固定_数组类.加入成员 ('D')
    字符数组3_不固定_数组类.加入成员 ('E')
    编辑框1.内容 = 编辑框1.内容 + "\r\n" + "下面输出字符数组3的信息:"
    编辑框1.内容 = 编辑框1.内容 + "\r\n" + "成员数:" + 到文本 (字符数组3_不固定_数组类.取成员数 ())


    计次循环 (字符数组3_不固定_数组类.取成员数 ())
    {
        输出文本 = 输出文本 + 到文本 (字符数组3_不固定_数组类.取成员 (取循环索引 ()))

    }
    编辑框1.内容 = 编辑框1.内容 + "\r\n" + "成员:" + 输出文本




    返回 (0)
}


回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|递归火山软件开发平台 ( 鄂ICP备18029190号 )

GMT+8, 2025-9-19 03:26 , Processed in 0.088276 second(s), 19 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表