微信小程序 > 微信公开课 > 求恐怖的整人小程序
微信小程序,微信公开课,求恐怖的整人小程序

求恐怖的整人小程序

2019-03-12 17:01:43

微信公开课小程序热门讨论「求恐怖的整人小程序」最新回复-该程序会截取当前电脑画面,然后全屏显示,你双击第一次它会警告你说你已经中毒,然后出现黑屏,再次双击会告诉你“sb上当了吧”,然后退出程序!哈哈。。很整人的!你自己运行了就知道了,决不损坏你的电脑!你需要做的很简单,只要两个窗体就可以,form1和form2的borderstyle都设置成0,autoredraw属性都设置成true,form2的windowstate设置成2,backcolor设置成黑色就可以了,然后复制下面代码:form1代码:OptionExplicitDimscreenhwnd,screendcPrivateDeclareFunctionBitBltLibgdi32(ByValhDestDCAsLong,ByValxAsLong,ByValyAsLong,ByValnWidthAsLong,ByValnHeightAsLong,ByValhSrcDCAsLong,ByValxSrcAsLong,ByValySrcAsLong,ByValdwRopAsLong)AsLong以下API函数可以通过VB自带的API文本浏览器复制而来。PrivateDeclareFunctionGetDCLibuser32(ByValhwndAsLong)AsLongPrivateDeclareFunctionGetDesktopWindowLibuser32()AsLongPrivateDeclareFunctionReleaseDCLibuser32(ByValhwndAsLong,ByValhdcAsLong)AsLongPrivateSubForm_DblClick()MsgBox电脑中了病毒,请重装系统!,vbCritical,严重警告UnloadMeForm2.ShowEndSubPrivateSubForm_Load()Me.Width=Screen.WidthMe.Height=Screen.HeightMe.Left=0Me.Top=0Me.ZOrder0App.TaskVisible=Falsescreenhwnd=GetDesktopWindow()screendc=GetDC(screenhwnd)BitBltMe.hdc,0,0,Me.Width,Me.Height,screendc,0,0,&HCC0020ReleaseDCscreenhwnd,screendcEndSubform2代码:PrivateSubForm_DblClick()MsgBoxsb上当了吧,按‘确定’退出,,玩笑EndEndSub这个比较整人的,VB程序。
用c#能做这样的程序,不难,主要是图版可能会不一样。 更多有关「求恐怖的整人小程序」的疑问请扫码关注微信公开课+小程序!
标签:微信公开课,小程序
微信小程序,微信公开课,求恐怖的整人小程序

「求恐怖的整人小程序」热议话题订阅

方法1:微信扫描微信公开课小程序码即可订阅热议话题「求恐怖的整人小程序」

方法2:微信搜索微信公开课小程序名称进入,即可订阅热议话题「求恐怖的整人小程序」

方法3:微信网页访问即速商店,长按识别微信公开课小程序码即可订阅热议话题「求恐怖的整人小程序」

微信公开课小程序热议话题「求恐怖的整人小程序」由微信公开课原创摘录于微信小程序商店shop.jisuapp.cn,转载请注明出处。

微信公开课热议话题「求恐怖的整人小程序」由微信公开课开发者向微信用户提供,并对本服务内容、数据资料及其运营行为等真实性、合法性及有效性承担全部责任。