各位,请问怎么用快捷方式启动一的VB程序啊????
比如我用VB编的一个屏幕保护程序,每次点击启动麻烦了
能否用快捷键来启动
或者想Windows系统中的屏幕保护系统一样一定时间离开电脑后自动启动!!!!各位高手能教教我吗!!!!!!

解决方案 »

  1.   

    命令:
      shell "c:\xxxx\abc\PossibleExecute.exe"
      

  2.   

    再写个程序调用
    先将它生成exe文件,然后用命令调用。
    shell "路径名"
      

  3.   

    =========================================
                   用快捷健启动
    =========================================
    简单的方法:
        可以为你的应用程序先创建一个"快捷方式",然后选择你创建的"快捷方式"的属性,在"快捷方式"属性的"快捷健"栏中设置你要启动程序的快捷健。然后把它放到"开始"菜单的"程序"菜单中或就放在"桌面",当你按下你定义的快捷健时你的程序就启动了。编程的方法:
        一般采用键盘监视技术,你必须在系统启动时就把你的监视程序加载到系统中运行,对于启动加在程序的方法很多,但我常用的是直接用程序修改注册表的HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
    主键内容,一般来说监视程序可以直接在你的程序中内制,我常常是用一个专门的窗口作为监视程序的调用模块,启动时用监视程序启动,当事件触发时监视程序就调用相应的窗口或程序作出反应。一般监视按键最常采用的方法是用Timer控件的定时监视。用API函数的GetAsyncKeyState函数作为键盘按键状态判断的值,使用方法如下:
    Private Sub Timer1_Timer()
       If GetAsyncKeyState(vbKeyA) And GetAsyncKeyState(vbKeyClear) Then
          MsgBox "触发事件"
       End If
    End Sub
    (记住不要忘了设置Timer控件的时间间隔属性)
    =========================================
             想屏幕保护一样自动启动
    =========================================
    简单的方法:
    把你编译的EXE文件复制到系统目录里(如:C:\WINNT\SYSTEM32),然后再把扩展名改为SCR(如:tt.exe 改为 tt.scr),然后再屏幕保护中选择你的程序并进行设置就行了。但对于屏幕保护程序的编写也有专门的编写方法,不知你知道否。编程的方法:
    可以采用上面键盘的监视方法
    用一个全局变量表示最后操作的时间,和几个全局变量作为系统状态的存储变量
    设定一的Timer控件的时间间隔为1000毫秒(就是1秒)
    当Timer事件发生时就用API函数把键盘的按件信息和鼠标的位置还有鼠标的按键信息保存到局部变量中,然后判断全局变量的信息是否与局部变量的信息一致,如果不一致将那个时间变量设置为当前的时间信息,在把全部的局部变量信息赋值到全局的存储变量中。当然如果变量相同的话就不进行任何变量的设置,你只需要做的就是判断存储在你当前的时间大于你全局变量中的时间多少,然后你就可以触发你自己的事件了。程序很简单,我就不写了,但要用到的几个API我还是提供给你把.
    Type POINTAPI
            X As Long
            Y As Long
    End Type
    Public Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As LongPublic Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer