Question

VB如何让一个程序后台运行

我就是想制作一个外壳，在壳子里面载入另外一个程序，然后我运行外壳的时候，壳子里面的另外一个程序会也会跟着运行，但是是后台运行的，就是别人看的时候是看见我的壳子，而不是另外一个程序！！就是这个样子！ 求助，呵呵！应该怎么弄！

Answer 1

1添加一个Timer时间控件

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer
'申明api

Private Function MyHotKey(vKeyCode) As Boolean
MyHotKey = ((GetAsyncKeyState(vKeyCode) < 0))
End Function

Private Sub Form_Load()
Timer1.Interval = 100 '定时检测
Me.Visible = False
End Sub

Private Sub Timer1_Timer()
If MyHotKey(vbKeyO) Then Me.Visible = True
'还可以换成调用其他函数
End Sub

Answer 2

用加壳工具，要么在写程序的时候不要用窗口框架。只保留程序功能。