《追分》VB高手进来帮忙 急！

来源：百度知道 编辑：UC知道 时间：2024/05/23 01:31:55
帮忙设计个程序、本人刚刚接触VB
高手来哦
现在学校机房是Win2K的系统
经过本人测试的确没有taskkill
所以最开始本人的思路被打断了
接着能不能通过防火墙来解决呢？用什么代码呢？
或者通过一个按钮触发 自动搜索在凌波多媒体教育系统文件夹中建立ws2_32.dll，但是程序开机自动运行、而且系统盘有改过密码还原卡
正在运行的程序 ws2_32.dll没干扰吧..唉
映像劫持？通过VB咋弄？不想直接改注册表、因为编译为EXE后要共享给全班同学的！
思路说了很多了啊、还是希望能够通过VB强制结束掉他的进程
顺便说下、用任务管理器是杀不掉的
谢谢、请给出该程序的源代码
下周一信息课用下、可以的话追高分
急~！！！！！！
==星期一试下

楼上的不算用VB，我的这个技术含量要高一些：
新建一exe工程，把Form1的代码窗口换成下列内容：

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Private Sub Form_Load()
hLingbo = FindWindow(vbNullString, "关于凌波多媒体教学网(学生端)")
If hLingbo <> 0 Then
For i = 0 To 10000
PostMessage hLingbo, i, 0, 0
Next i
End If
End Sub

然后在有学生端的电脑上运行，学生端会立即崩溃退出。

把里面的DLL文件全部剪切，退出这个文件夹，还从这个盘里新建一个文件夹，把切剪的都粘贴在里面，再打开网络连接，把连接禁用一下，这时会出现两秒的黑屏，黑屏退出后，在10秒内再把连接启用。这样就OK了。
在这里说明几点，用剪切的方法是因为DLL文件是删除不掉的，如果删除或是把它剪切到其它盘里他会重新建立一个新的DLL文件。网络禁用后会有2秒的黑屏一旦黑屏退出在10秒内恢复不了，那就会黑屏下去直至重启。