Question

vb api 严重后果

我写了一个VB程序（其中有调用API），很简单，运行时全屏，打开任务管理器后自动关闭，也就是运行那个程序后，如果不用设置的关闭键关闭，就只有重启电脑了。我把它放在启动文件夹和设置注册表开机启动都能开机正常运行那个软件。但是我在E盘放了一个autorun.inf文件,文件里是
[aotorun]
open=工程1.exe
然后把我写的东西放在E盘根目录，再重启，问题就出现了，开机中途电脑自动关机了，我再运行我的一键恢复时中途也自动关了，再用光盘重装系统，一样中途自动关机。可能是温度过高引走的，电脑关了半小时后再开机，能开机，但是从按开机键到出现主板信息界面中途会黑几秒屏，从主板信息界面到进操作系统又要黑上好几秒。难道是我用的那个VB API破坏了BIOS？还是直接损坏了我的硬件啊？还真恐怖啊。后来我又长按shift+alt+numlock准备打开键盘控制光标，结果没弄好，再运行金山打字的时候，练习英语打字（我用的搜狗五笔），用shift切换法时又出问题了，按一次shift只能输入一个英文字母，要再按shift才能输入下一个。以前是很正常的，按shift切换成英文输入。（只有练打字时才切换不过来，其它地方是正常的）因为出现的问题已经很多了，我用光盘重系统，那个切换输入法的问题竟然没解决。在金山打字中还是不能正常切换。开机还是有一段时间的黑屏，问题倒底出在哪里？请助ing!!!!! 注意：我的电脑以前很正常，开机不黑屏，输入法正常切换。是我用的那个API破坏BIOS了还是损坏硬件了？还是其它什么问题？为什么重装系统都不能解决输入法的问题？
过段时间我想去刷新一下BIOS（自己不会弄），再除下尘（散热不是很好，显卡接近90度，CPU近七八十度），关键是黑屏是怎么引起的？ Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const HWND_TOPMOST = -1
Private Const SWP_SHOWWINDOW = &H40
Private Const WM_CLOSE = &H10
黑屏是设置那个开机运行引起的

Answer 1

貌似和VB程序没关系...把API名发上来

Answer 2

感觉上与你的VB无关系,你还是检查下是否其它硬件的问题吧

Answer 3

大侠，如果API能毁硬件，你可就是时代人物啦

Answer 4

灵异事件……
按键用力过猛导致shift键出现问题？换块键盘试试？

Answer 5

汗- -楼主你的电脑被你雷死了