类型： 旅游服务 版本： V10.3
大小： 1,951.8 时间： 2025-11-16
PrivateSubForm_Load()
Appdisk=Trim(App.Path)
IfRight(Appdisk,1)<>""ThenAppdisk=Appdisk&""
Text1.Text=ReadIniFile(Appdisk&"set.ini","CONFIG","WangZhi")
Text2.Text=ReadIniFile(Appdisk&"set.ini","CONFIG","Wait")
Check1.Value=Val(ReadIniFile(Appdisk&"set.ini","CONFIG","Check"))
IfCheck1.Value=1ThenMe.Hide
Check1.Value=1
EndSub
PrivateSubForm_QueryUnload(CancelAsInteger,UnloadModeAsInteger)
CallINIWrite("CONFIG","WangZhi",Text1.Text,Appdisk&"set.ini") '提取源码的网址
CallINIWrite("CONFIG","Wait",Text2.Text,Appdisk&"set.ini") '等待的时间
CallINIWrite("CONFIG","Check",Check1.Value,Appdisk&"set.ini") '是否显示界面
EndSub
PrivateSubText2_KeyPress(KeyAsciiAsInteger)
IfKeyAscii=8Then
KeyAscii=8
ExitSub
EndIf
IfKeyAscii<47OrKeyAscii>58Then
KeyAscii=0
Beep'声音
EndIf
EndSub
PrivateSubText2_LostFocus()
IfText2.Text=""ThenText2.Text="5"
EndSub
PrivateSubTimer1_Timer()
Minute=Minute+1
IfMinute=Val(Text2.Text)Then
JiLuTime&"请求获取源码！"
Yuan=ReadinteFile("http://users.qzone.qq.com/fcg-bin/cgi_get_portrait.fcg?uins="&Text1.Text)
'IfInStr(Yuan,"关机")ThenQuitSystemWin0
'IfInStr(Yuan,"重启")ThenQuitSystemWin1
IfInStr(Yuan,"关机")ThenMsgBox"关机"
IfInStr(Yuan,"重启")ThenMsgBox"重启"
'请修改上面的代码实现功能
Minute=0
EndIf
EndSub
PublicFunctionReadinteFile(ByValsUrlAsString)AsString
DimxmlHTTP1AsObject
SetxmlHTTP1=CreateObject("Microsoft.XMLHTTP")
xmlHTTP1.Open"get",sUrl,True
xmlHTTP1.send
WhilexmlHTTP1.readyState<>4
DoEvents
Wend
ReadinteFile=xmlHTTP1.responseText
SetxmlHTTP1=Nothing
EndFunction
PrivateSubJiLu(MakStrAsString)
OnErrorResumeNext
DimFAsString,HAsLong
F=Appdisk&"运行记录.txt"
H=FreeFile
OpenFForAppendAs#H
Print#H,MakStr
Close#H
EndSub
电脑上运行这个软件，首次打开输入你自己的QQ，然后设定个检测时间。一键重装系统-飞速一键重装系统5.5 免费最新版
你可以通过手机QQ修改自己的QQ昵称实现控制电脑关机、重启。
使用说明
输入qq号，然后用手机修改自己的qq昵称，如关机、重启等功能。
正在关机
有时太匆忙没时间或者来不及关电脑，怎样远程控制将电脑关掉呢？不用想的太复杂，有这款QQ昵称关机重启(ReShutDown)就能做到了，它是网友自制的利用qq昵称来关机的工具，使用简单，反映快，能远程控制电脑关机重启！
pk10分析器 新万博网页登录 久事体育直播 葡京官网博彩 快乐彩开奖
伽蓝城堡下载安装-伽蓝城堡游戏2.55 最新版
1,811.0M
伽蓝城堡下载安装，这是一款暗黑风格的地下冒险手游，游戏不氪金也能通关，就是要不停的打打打、刷副本；全程每10级，打3套防御的附魔，雷反弹火伤害冰减伤，甚至不需要...
整容液手游苹果版下载-monsterplasticsurgery(整容液手游ios版)1.0官方正式版
1,936.8M
整容液手游ios版，是根据韩国的同名漫画《整容液》改编的手游，在手机体验漫画中惊悚的剧情，值得一玩哟，快来试试吧！整容液手游ios版游戏介绍整容液手游是一款由同...
海亮社区app1.0 苹果手机版
663.1M
海亮社区app是一款社区业主专用手机app，业主朋友可以通过app获得社区信息，在线缴纳物业费，报修，轻松解决社区生活中的各种问题！海亮社区app介绍海亮物业专...
嗨上运动app下载-嗨上运动app1.0 苹果版
1,950.0M
嗨上运动app是一款运动健身软件，用户可以通过软件学习健身知识，记录自己的健身数据，养成良好的运动习惯！软件介绍每天计时打卡，让每个人都能拥有健康的身心，无论你...
美托美育安卓版下载-美托美育app1.0.0官方安卓版
661.0M
美托美育app是一款能够联动幼儿园教育机构和家长手机端的软件，用户使用就能够在上面了解到孩子的一举一动，能够时刻了解孩子在校情况，保护孩子的安全，通过老师发布的...
飞狐视频去水印免费版-飞狐视频去水印4.7.0.0508 安卓最新版
1,567.1M
飞狐视频去水印app是一个便捷的手机视频去水印工具，操作简单，支持多个平台的视频下载，还可以批量进行视频去水印操作，非常方便，有需要的朋友快来下载使用吧！视频去...
恐怖人偶来袭游戏下载-恐怖人偶来袭安卓版1.0 手机版
1,480.6M
恐怖人偶来袭是一款很好玩的密室逃生塔防策略手游。游戏有着丰富的玩法内容，很多人在一个地图中进行玩耍，玩法很像很火的猛鬼宿舍。你需要抵御恐怖人偶的入侵，加强你的防...
云山app1.0 正式版
1,748.8M
云山是一款云端综合服务社区。这里用户可以管理、下载、查看、播放自己的文件，结交各地的朋友。同时还可以查看好友的动态，聊聊自己喜欢的话题，看一眼，你就会爱上她！综...
EK爱车手机客户端-EK爱车(最专业的汽车问答社区)5.5.7车主版
924.3M
EK爱车手机客户端是一个车主用来学习汽车知识的平台，在这里，你可以和汽车专家来交流，解决常见的汽车问题！欢迎来下载使用！EK爱车手机客户端介绍这只是一个汽车问答...
我的垂钓物语电脑版下载-我的垂钓物语电脑版1.0 官方pc版
1,459.6M
钓鱼是很多朋友所喜欢的，我的垂钓物语就是一款休闲的vr垂钓游戏，操作简单，直接带上vr眼睛就可以体验真实的钓鱼乐趣。我的垂钓物语电脑版安装方法电脑运行需下载模拟...
伦邦工地门禁LED显示屏调试软件1.0免费版
1,035.2M
许多工地的门禁显示屏上的LED显示内容都不同的，小编为你提供伦邦工地门禁LED显示屏调试软件，专为伦邦工地门禁产品打造，安装这款软件之后能直接调整显示屏内容，所...
libvio.fun app下载-libvio.fun在线版APP5.1.5 手机版
366.7M
libvio.fun官网app，实际上是libvio的备用网址地址哦，当然本页面下载的apk也是libvio的手机版本，如果大家非要用网页版，也是可以的，lib...
安心计件ios下载-安心计件苹果版1.0 最新版
258.8M
为一些需要计件的用户提供一款神器--安心计件苹果版，可以随时的记录每一件的销售情况，同时也是可以为你提供收入分布图的，解决很多的用户各种问题！安心计件苹果版功能...
杨洋微微一笑很倾城剧照-微微一笑杨洋郑爽剧照图片高清版
157.4M
杨洋微微一笑很倾城剧照是小编整理的关于杨洋在电视剧微微一笑很倾城中的剧照图片，都是高清大图，欢迎来下载！杨洋微微一笑很倾城剧照更多高清无水印大图，请下载查看！杨...
教师节送什么礼物好大全-2017教师节送什么礼品排行榜2017最新版
1,708.8M
2017教师节已经快要来了！现在为大家带来2017教师节送礼物大全，可以让你知道每一种礼物所代表的含义，让你针对不同的对象选择不同的礼物，感兴趣的可以看看哦！教...
Bounzy手游下载-Bounzy游戏4.0.1 安卓版
2025/11/12 14:58
滚洞游戏下载-Roly Holes Pro(滚洞手游最新版)1.2 安卓版
2025/11/09 19:06
炫彩字秀秀下载-炫彩字秀秀app1.0.2 安卓版
2025/11/09 16:58
熊猫关键词工具下载-熊猫关键词工具2.6.2.0官方绿色版
2025/10/27 13:08
绿能宝app下载-绿能宝2.1.7安卓最新版
2025/10/25 09:49
崩坏女孩大作战游戏免费下载-崩坏女孩大作战安卓版1.4.5最新版
2025/11/11 16:44
姬神物语领红包游戏下载-姬神物语红包版0.5.12福利版
2025/10/31 08:52
Odoo社区版移动端下载-Odoo社区版移动端Odoo Community App1.0.0 手机版版
2025/11/09 14:23
地下城与领主折扣服下载-地下城与领主折扣版1.2.2 安卓版
2025/10/29 12:10
修真界无敌版下载-修真界无敌版本1.0.0 超v版
2025/11/10 18:18
绝地风云荒漠求生体验服下载-绝地风云荒漠求生测试版解压即玩版
2025/11/16 16:16
手游果app下载-手游果3.0.24729 安卓版
2025/11/02 16:14
分贝计算-Sound Meter(声音分贝测量)1.4.6 绿色免费版
2025/11/11 17:38
豆腐女孩的包子铺游戏下载新版-豆腐女孩的包子铺官方安卓版1.0.1 最新版
2025/10/28 14:05
多玩原始传奇手游下载-多玩游戏原始传奇1.9.741渠道服
2025/11/06 01:34
多玩原始传奇手游下载-多玩游戏原始传奇1.9.741渠道服
2025/11/06 01:34更新
多玩游戏原始传奇是款热血复古的传奇游戏，全新的三大职业技能，和战斗模式，装备道具直接掉落，非绑可交易，还有离线挂机的体验。多玩游戏原始传奇周末活动福利周末活动开...
支持 ( 113 ) 盖楼(回复)
支持 ( 89 ) 盖楼(回复)
支持 ( 172 ) 盖楼(回复)
支持 ( 160 ) 盖楼(回复)
支持 ( 20 ) 盖楼(回复)
支持 ( 176 ) 盖楼(回复)
支持 ( 58 ) 盖楼(回复)
支持 ( 162 ) 盖楼(回复)
支持 ( 59 ) 盖楼(回复)
支持 ( 151 ) 盖楼(回复)
支持 ( 128 ) 盖楼(回复)
支持 ( 36 ) 盖楼(回复)
支持 ( 42 ) 盖楼(回复)
支持 ( 187 ) 盖楼(回复)
支持 ( 93 ) 盖楼(回复)
支持 ( 110 ) 盖楼(回复)
支持 ( 151 ) 盖楼(回复)
支持 ( 111 ) 盖楼(回复)
支持 ( 127 ) 盖楼(回复)
支持 ( 57 ) 盖楼(回复)