|
<火山程序 类型 = "通常" 版本 = 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)
}
|
|