易截截图软件、单文件、免安装、纯绿色、仅160KB

VB句柄概念 不懂以后深入理解

最近在学习windows API的时候发现在个叫句柄的概念搞不清楚,于是查了一下现在把自己的理解写出来,后面再贴网上的介绍。句柄是一个代表窗口的正整数,当然窗口的概念在这里包含了桌面、按钮、滚动条等,这就是我最简单的理解了。
以下是网上的介绍:
                        了解句柄
在调用 DLL 函数前必须理解的另外一个重要概念是句柄。句柄是一个 32 位的正整数,Microsoft® Windows® 用它来识别窗体或其他对象,例如字体或位图。
在 Windows 中,窗口可以有许多种。窗口可以是屏幕上的一块矩形封闭区域,比如您熟悉的应用程序窗口。窗体上的控件(例如列表框或滚动条)也可以是窗口,但并不是所有类型的控件都是窗口。桌面上的图标和桌面本身也是窗口。
因为所有这些类型的对象都是窗口,所以 Windows 可以用类似的方式处理它们。Windows 给每个窗口一个唯一的句柄,通过句柄操纵该窗口。许多 API 函数可返回句柄或者接受句柄作参数。
创建窗口时,Windows 给它指派一个句柄,窗口消失后句柄被释放。虽然句柄在窗口的整个生存期内保持不变,但不能保证某窗口在被损坏并重新创建后还使用原来的句柄。所以,如果在变量中存储了一个句柄,请记住窗口损坏后句柄就失效了。
例如 GetActiveWindow 函数就可以返回窗口的句柄,这里的窗口是一个当前活动的应用程序窗口。GetWindowText 函数接受窗口的句柄,如果该窗口有标题,则返回标题。下面的过程用 GetActiveWindow 返回活动窗口的句柄,用 GetWindowText 返回该窗口的标题:
Declare Function GetActiveWindow Lib "user32" () As Long
Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" _
(ByVal Hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Function ActiveWindowCaption() As String
Dim strCaption As String
Dim lngLen As Long
' 创建由空字符填充的字符串。
strCaption = String$(255, vbNullChar)
' 返回字符串长度。
lngLen = Len(strCaption)
' 调用 GetActiveWindow,返回活动窗口的句柄,
' 把句柄连同字符串和字符串长度一起传递给 GetWindowText。
If (GetWindowText(GetActiveWindow, strCaption, lngLen) > 0) Then
' 返回 Windows 写到字符串中的值。
ActiveWindowCaption = strCaption
End If
End Function
GetWindowText 函数有 3 个参数:


相关文档:

VB检查合法IP地址

Public Function IsValidIPAddress(ByVal strIPAddress As String) As Boolean
    On Error GoTo Handler
    Dim varAddress As Variant, n As Long, lCount As Long
    varAddress = Split(strIPAddress, ".", , vbTextCompare)
    If IsArray(varAd ......

给VB增加一个滚轮,让VB编代码的时候更方便


VB6IDEMouseWheelAddin.dll
就是这个能使你在VB的代码编辑窗口能够使用鼠标滚轮,编辑代码、查看代码更方便。
下面详述:
1、给大家一个下载地址:
http://download.microsoft.com/download/e/f/b/efb39198-7c59-4ace-a5c4-8f0f88e00d34/vb6mousewheel.exe右击解压,再右击解压,这时就会看到一个dll文件,这个就是我 ......

VB百例总结(1)

昨天晚上,米老师把我叫到办公室。问我学了一周感觉如何,我当时很汗颜。米老师身体不好,电脑版班么多学生,他可以让自己轻松一点儿,但他没有。作为几十个学生的免费老师,做为人父人夫,老师尚且知道我学了一周成果怎样呢,但我自己却没有想过,很惭愧。犯任何错误第一次可以原谅,但绝不应该让它出现第二次,学了一周, ......

VB Format函数

Format[$] ( expr [ , fmt ] )
format 返回变体型
format$ 强制返回为文本
--------------------------------
数字类型的格式化
--------------------------------
    固定格式参数:
    General Number 普通数字,如可以用来去掉千位分隔号
    format$("100 ......

VB无所不能之四:制作透明和半透明窗体

VB无所不能之四:制作透明和半透明窗体
 
——作者:钟声 
 
我们经常可以看到这样的窗体,觉得很炫,如图所示:
 
 
        同样,对Windows系统方面的编程似乎首先想到的绝对不是VB,而大部分程序员想到的一定是VC。
  & ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号