help!!! Shell ExeName, vbMaximizedFocus 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Longsub ActWindow()dim a as longa=FindWindow(vbNullString, "你要击活的窗口标题") if a<>0 then AppActivate "你要击活的窗口标题" endif end sub 地址正在使用 在VB6调用Delphi6开发的DLL时出现的问题,谁能帮看看? webbrowser打开word后怎样编辑??保存到服务器? 怎么调用系统的打印机并将表格中的数据打印出来? 奇怪 算网速该怎么算呀 一个天大的问题---高校选课系统(一个可用分已经用完的菜鸟) 菜鸟问题,如何实现这个程序在不同的机器上都能运行? VB中如何把字符串表达式的值取出来 一个imagelist赋给两个背景色不同的控件,怎样让imagelist中的icon背景色适应这两个不同背景色的控件 各位高手救命啊!搞了一天了,搞不懂为什么,你说这个。。。。。 datagrid的问题多谢了
dim a as long
a=FindWindow(vbNullString, "你要击活的窗口标题")
if a<>0 then
AppActivate "你要击活的窗口标题"
endif
end sub