怎样用VB编程实现获取一个正在运行的程序的焦点

怎样用VB编程实现获取一个正在运行的程序的焦点,第1张

窗体置顶代码

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

Public Const SWP_NOMOVE= &H2 '不移动窗体

Public Const SWP_NOSIZE=&H1 '不改变窗体尺寸

Public Const Flag=SWP_NOMOVE Or SWP_NOSIZE

Public Const HWND_TOPMOST=-1 '窗体总在最前面

Public Const HWND_NOTOPMOST=-2 '窗体不在最前面

为窗体添加代码如下:

Private Sub cmdNormal_Click()

cmdTopMostEnabled=True

cmdNormal Enabled= False

Form1Captio = "现在是普通窗口"

SetWindowPos Form1hwnd,HWND_NOTOPMOST,0,0,0,0,Flag

End Sub

Private Sub cmdTopMost_Click()

cmdTopMostEnabled = False

cmdNormalEnabled = True

Form1Caption = "现在是TopMost窗口"

SetWindowPos Form1hwnd,HWND_TOPMOST,0,0,0,0,Flag

End Sub

方法/步骤

点击开始。“计算机”上右击-管理-服务和应用程序-服务(你也可以直接win+R,在运行框中输入SERVICESMSC来开启)

找到你要启动的服务,这里我们以vmware的一个服务来举例。

在该服务上右击,属性,在d出的对话框中找到服务名称这一项,复制下来,接下来的不走我们会用到它,复制下来之后,就可以把这些页面关掉了。

在桌面上新建一个文本文档,然后打开它,在里面输入

NET START XXXX(前面复制下来的服务名)

pause

比如说我们这里就输入

NET START VMAuthdService

pause

然后关闭,保存。

在这个文本文档上右击,重命名,将其重命名为XXXXBAT

比如我这里就改名为"启动VM服务bat"(其实前面的名称什么无所谓,主要还是要把他的后缀名改为bat,如果你的文件不显示后缀名的话,在网上找一下如何打开后缀名选项吧)

到这里基本上已经大功告成了,在需要使用的时候只要运行这个BAT档案(有的系统需要有件-以管理员身份运行),那么这个服务就会自动启动了,省去了繁琐的 *** 作步骤!

很多时候我们都会在cmd命令行运行exe程序,那么如何 *** 作呢?下面我给大家分享一下。

工具/材料

cmd命令行

01

首先我们需要准备一个exe文件,放到桌面上,如下图所示

02

接下来我们按Win+R组合键打开运行窗口,在输入框中输入CMD命令,如下图所示

03

然后我们右键单击exe文件,打开属性对话框,在其中复制exe文件所在的目录,如下图所示

04

最后将复制的路径拷贝到cmd命令行执行exe文件,如下图所示

以上就是关于怎样用VB编程实现获取一个正在运行的程序的焦点全部的内容,包括:怎样用VB编程实现获取一个正在运行的程序的焦点、如何使用CMD打开某应用程序命令行并在打开的应用程序中执行指定命令、怎样用cmd运行exe控制台程序等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/9778019.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-01
下一篇 2023-05-01

发表评论

登录后才能评论

评论列表(0条)

保存