| 编程中国 | 业界新闻 | 技术文章 | 视频教程 | 下载频道 | 程序源码 | 个人空间 | 编程论坛
全能ASP/PHP/ASP.NET主机,支持月付专业 MSSQL 数据库空间,支持月付专业 MySQL 数据库空间,支持月付买域名,送MP3、MP4
高端软件开发 = 年薪十万不是梦赛孚耐:软件保护加密专家身份认证令牌USB KEY买空间,免费送域名(厦门中资源)
共有 242 人关注过本帖
标题:FindWindow函数,窗口可以用变量代替吗?
收藏  订阅  推荐  打印 
wuyuede
Rank: 2
等级:注册会员
帖子:51
积分:614
注册:2007-3-29
FindWindow函数,窗口可以用变量代替吗?

FindWindow函数,窗口可以用变量代替吗?


Dim ip As String
Dim hwd As Long
Dim hwdd As Long

Private Sub Command1_Click()
hwd = FindWindow("SciCalc", ip) 'IP=“计算器”,在这里做为窗口,但是运行后,提示“未运行”
If hwd = 0 Then
MsgBox "未运行!!!!!", , "未运行"
End If
Label2.Caption = hwd
End Sub




Private Sub Form_Load()
ip = Inet1.OpenURL("http://www.qqdgame.net/ip.txt")    '读取ip.txt里的内容,内容是“计算器”,把“计算器”付值给IP
Text1.Text = ip
End Sub





请高人门,帮我看看,我的意思就是 读取网站里的一个文本文件,文本文件里的内容是计算器的窗口名字,我把这个窗口名字付值给IP这个变量,然后在
Command1 里用IP作为标题,但是运行后 句柄为0,找不到计算器。








我把 变量 IP取的内容“计算器”  付值给  text1.text后, text1.text  显示 “计算器”这3个字,然后运行
hwd = FindWindow("SciCalc", text1)
提示 HWD=0  ,找不到句柄


我如果直接给 TEXT1里写上 “计算器”运行hwd = FindWindow("SciCalc", text1)
提示  HWD<>0  , 找到句柄



所以我觉的  IP这个变量 的定义是不是 和 lpWindowName 这个定义不相符,造成无法正确传递直
搜索更多相关主题的帖子: 变量  FindWindow  计算器  函数  窗口  
2008-8-16 12:05
XMeLoDy
Rank: 2
等级:注册会员
帖子:56
积分:700
注册:2007-10-4

hwd = FindWindow("SciCalc", ByVal ip)

这句这样写试试,,
2008-8-16 13:16
wuyuede
Rank: 2
等级:注册会员
帖子:51
积分:614
注册:2007-3-29
回复 2# XMeLoDy 的帖子

谢谢,我测试下
2008-8-16 13:23
关于我们 | 广告合作 | 编程中国 | 清除Cookies | Archiver | WAP | TOP

编程中国 版权所有,并保留所有权利。鲁ICP备08000592号
Powered by Discuz, Processed in 0.069246 second(s), 9 queries.
Copyright©2004-2008, BCCN.NET, All Rights Reserved