锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net枚举窗口 vb枚举类型enum用法

IT技术还原成

VB.net如何枚举字符串？Enum Week
周日 = 0
周一 = 1
周二 = 2
周三 = 3
周四 = 4
周五 = 5
周六 = 6
End Enum
Sub Main()
Dim myType As Type = GetType(Week)
MsgBox(Week.GetName(myType, Week.周二))
End Sub
在vb.net中，如何枚举一个注册的组件其开放的COM类的接口函数 。为什么增加的回答这么久还没显示 。
我想知道你为什么要枚举这些方法 ， 是需要打印出来还是只是为了查看和调用？
1，如果只是为了查看和调用的话，不需要用代码就能知道了 。
打开VS，视图－》对象浏览器 。然后开了后，点浏览右边的“ 。。。”，开了后 。选COM活页，再在里面选ThunderAgent 1.0 Type Library 。再点添加 。
添加好之后 。在左边的浏览窗口内就有了，展开THUNDERAGENTLib下面有几个类和接口，展开类就有方法了 。
2，如果是需要用代码枚举并打印 。网上有相关的代码 ， C#写的 。我就不帖了 。自己搜一下 。改成vb.net相信应该不会太难 。
【vb.net枚举窗口 vb枚举类型enum用法】祝你好运 。
VB中Enumchildwindow函数怎么用？Private Declare Function EnumChildWindows Lib "user32" (ByVal hWndParent As Long, ByVal lpEnumFunc As Long, ByVal lParam As Long) As Long
【说明】
为指定的父窗口枚举子窗口
【返回值】
Long，非零表示成功 ， 零表示失败
【参数表】
hWndParent -----Long，欲枚举子窗口的父窗口的句柄
lpEnumFunc -----Long ， 为每个子窗口调用的函数的指针 。用AddressOf运算符获得函数在一个标准模块中的地址
lParam ---------Long，在枚举期间，传递给dwcbkd32.ocx定制控件之EnumWindows事件的值 。这个值的含义是由程序员规定的 。
示例
'Example Name:EnumChildWindows
'in a form
Private Sub Form_Load()
'KPD-Team 2000
'URL:
'E-Mail: KPDTeam@Allapi.net
Me.AutoRedraw = True
EnumChildWindows GetDesktopWindow, AddressOf EnumChildProc, ByVal 0
End Sub
'in a module
Declare Function GetDesktopWindow Lib "user32" () As Long
Declare Function EnumChildWindows Lib "user32" (ByVal hWndParent As Long, ByVal lpEnumFunc As Long, ByVal lParam As Long) As Long
Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hwnd As Long) As Long
Public Function EnumChildProc(ByVal hwnd As Long, ByVal lParam As Long) As Long
Dim sSave As String
'Get the windowtext length
sSave = Space$(GetWindowTextLength(hwnd) + 1)
'get the window text
GetWindowText hwnd, sSave, Len(sSave)
'remove the last Chr$(0)
sSave = Left$(sSave, Len(sSave) - 1)
If sSave"" Then Form1.Print sSave
'continue enumeration
EnumChildProc = 1
End Function
vb.net实例化窗口后如何区分打开的窗口If App.PrevInstance = True Then
End
End If
如果程序正在运行，结束程序 。
在模块中加入每个窗口的标题变量 。
然后用if then 来判断是否有相同窗口 。
如果你事先不知道有哪些窗口的话 ， 那你就用枚举 FindWindow来查找子窗口句柄 。再用SendMessage 获得窗口标题再进行判断 。
VB.NET的枚举求教解决方法这个功能实现起来其实也很简单 ， 就是通过反射去读取 DescriptionAttribute 的 Description 属性的值，代码如下所示：
/// summary
/// 返回枚举项的描述信息 。
/// /summary
/// param name="value"要获取描述信息的枚举项 。/param
/// returns枚举想的描述信息 。/returns

推荐阅读


上一篇：javajs获得后台的值，js怎么获取后端数据

下一篇：文成会计师代理记账平台，文成会计师代理记账平台有哪些