|

楼主 |
发表于 2021-10-2 23:34:12
|
显示全部楼层
本节课源码:
.版本 2
.支持库 spec
.支持库 eAPI
.程序集 窗口程序集_启动窗口
.程序集变量 dm, 虫虫教学
.程序集变量 i, 整数型
.子程序 __启动窗口_创建完毕
.局部变量 ret, 整数型
dm.创建 ()
.如果 (dm.Ver () = “”)
dm.注册 ()
dm.创建 ()
.否则
.如果结束
调试输出 (dm.Ver ())
ret = dm.Reg (“bestcclm5208dad61379ce31d99817505c16bce11a2”, “OQ0x”)
.如果 (ret = 1)
调试输出 (“大漠VIP注册成功!”)
.否则
调试输出 (“大漠VIP注册失败!”)
.如果结束
.子程序 _组合框1_将弹出列表
.局部变量 进程, 进程信息, , "0"
.局部变量 a, 整数型
进程 = 取系统进程列表 ()
a = 取数组成员数 (进程)
.计次循环首 (a, i)
组合框1.加入项目 (进程 .进程名称, )
.计次循环尾 () |
|