用户表类
.版本 2
.程序集 类_用户
.程序集变量 私_账号, 文本型, , , 当前类私有变量，账号
.程序集变量 私_密码, 文本型, , , 当前类私有变量，密码
.程序集变量 sex, 文本型
.子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用
sex ＝ “男”
.子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用
.子程序 初始化用户, , 公开
.参数 nickname, 文本型
.参数 password, 文本型
私_账号 ＝ nickname
私_密码 ＝ password
.子程序 读取用户账户, 文本型, 公开
返回 (“账号：” ＋ 私_账号 ＋ “ 密码：” ＋ 私_密码 ＋ “ 性别：” ＋ sex)
调用测试
.版本 2
.支持库 spec
.子程序 _临时子程序
.局部变量 类_用户, 类_用户
.局部变量 res, 文本型
' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
类_用户.初始化用户 (“有勇气的牛排”, “123456”)
res ＝ 类_用户.读取用户账户 ()
调试输出 (res)
<h2><a id="_0"></a>用户表类</h2>
<pre><div class="hljs"><code class="lang-c">.版本 <span class="hljs-number">2</span>
.程序集 类_用户
.程序集变量 私_账号, 文本型, , , 当前类私有变量，账号
.程序集变量 私_密码, 文本型, , , 当前类私有变量，密码
.程序集变量 sex, 文本型
.子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用
sex ＝ “男”
.子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用
.子程序 初始化用户, , 公开
.参数 nickname, 文本型
.参数 password, 文本型
私_账号 ＝ nickname
私_密码 ＝ password
.子程序 读取用户账户, 文本型, 公开
返回 (“账号：” ＋ 私_账号 ＋ “ 密码：” ＋ 私_密码 ＋ “ 性别：” ＋ sex)
</code></div></pre>
<p><img src="https://static.couragesteak.com/article/a5b89e1de492f7e65319ebffe0475f64.png" alt="image.png" /></p>
<h2><a id="_35"></a>调用测试</h2>
<pre><div class="hljs"><code class="lang-c">.版本 <span class="hljs-number">2</span>
.支持库 spec
.子程序 _临时子程序
.局部变量 类_用户, 类_用户
.局部变量 res, 文本型
<span class="hljs-string">' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
类_用户.初始化用户 (“有勇气的牛排”, “123456”)
res ＝ 类_用户.读取用户账户 ()
调试输出 (res)
</span></code></div></pre>
<p><img src="https://static.couragesteak.com/article/54acc7e8de1b21eac6f9b498cdf0803e.png" alt="image.png" /></p>
留言