求恐怖的整人小程序

微信公开课小程序热门讨论「求恐怖的整人小程序」最新回复-该程序会截取当前电脑画面，然后全屏显示，你双击第一次它会警告你说你已经中毒，然后出现黑屏，再次双击会告诉你“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#能做这样的程序，不难，主要是图版可能会不一样。 更多有关「求恐怖的整人小程序」的疑问请扫码关注微信公开课+小程序！了解更多