Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

ΪºÎÓÃvb api»ñÈ¡µÄ´°¿Ú±êÌâΪ¿Õ£¬¶øSPY++È´¿ÉÒÔ

VBÖÐcallbacke function ÈçÏ£º
Public Function EnumChildProc(ByVal hwnd As Long, ByVal lParam As Long) As Long
    Dim slength As Long, WndTitle As String ' title bar text length and buffer
    Dim retval As Long ' return value
    Dim WClass As String * 50
    Static winnum As Integer ' counter keeps track of how many windows have been enumerated
    winnum = winnum + 1 ' one more window enumerated....
   
    slength = GetWindowTextLength(hwnd) + 1 ' get length of title bar text
    WndTitle = Space(slength) ' make room in the buffer
    retval = GetWindowText(hwnd, WndTitle, slength) ' get title bar text

    GetClassName hwnd, WClass, 50
    EnumChildProc = 1 ' return value of 1 means continue enumeration
End Function

½á¹ûÁбíÔÚexcelÖУ¬´°¿Ú¾ä±úΪ66622µÄÀà¿ÉÒÔÕÒµ½£¬µ«ÊÇTitleȴΪ¿Õ
ChildWndHnd ChildWndClass ChildWndTitle
66624 TCoolBar
66626 TToolBar
66620 TCoolBar
66622 TToolBar
66618 TPanel

µ«ÊÇΪʲôSPY++ÖÐÈ´¿ÉÒÔÕÒµ½£º





retval = GetWindowText(hwnd, WndTitle, slength)

¼ì²éretvalµÄÖµ,¿´¿´º¯ÊýÖ´ÐеĽá¹ûÊÇʲô.

APIµÄµ÷Óö¼»áÓзµ»ØÖµ,¶¼»á¸æËßÄã·¢ÉúÁËЩʲô.

ÒÔÉÏ´úÂë¿´²»³öhwndÊÇÈçº


Ïà¹ØÎÊ´ð£º

asp.net(vb)ÎÊÌâ

login.aspx.vb:

    Public ReadOnly Property nameT() As String
        Get
            Return TextBox1.Text
    &nb ......

vb datagrid sql

Ò»¸ö´°Ì壬3¸ödatagrid£¬¹²¼Æ3¸ö±í£¬Ò»¸ö±í¶ÔÓ¦Ò»¸ödatagrid£¬µã»÷datagrid1(´ò¿ª¸Ã´°ÌåʱÒѾ­±»¸³Öµ)£¬¸ù¾Ýdatagrid1ÖеÄij¸öÖµ£¬²éѯ±í2ºÍ±í3£¬²¢°Ñ·ûºÏÌõ¼þµÄ·Ö±ð¸³Öµ¸ødatagrid2ºÍdatagrid3£¬ÒªÔõôд

VB ......

vb+sql

ÔÚVBÖУ¬ÈçºÎÖ´ÐÐÏÂÃæµÄSQLÓï¾ä
Update t_Icitem Set f_102 = IsNull(f_102,0)+1 Where FNumber='0001'
±ÈÈ磺
cn.execute("Update t_Icitem Set f_102 = IsNull(f_102,0)+1 Where FNumber=&# ......

VB »ñÈ¡ÍøÒ³Ô´´úÂë

Ò»¸ö²éѯijÐÅÏ¢µÄASPÍøÒ³£¬Ìá½»²ÉÓõÄÊÇpost·½·¨£¬²éÕÒ½á¹ûµÄÍøÒ³±ØÐëÓÒ¼üµã»÷¡°²é¿´Ô´Îļþ¡±²ÅÄÜ¿´µ½ÕæÕý²éѯ½á¹ûÍøÒ³µÄÔ´´úÂ룬ÓÃä¯ÀÀÆ÷²Ëµ¥¿´µ½µÄÊDzéѯǰµÄÔ´´úÂë
ÓÃVBÓÐʲô°ì·¨¿ÉÒÔ»ñÈ¡µ½Õâ¸ö²éѯºóµÄÔ´´ú ......

VB Îı¾¿ò

×Ö·û´® m1="E"
×Ö·û´® m2="F"

Èç¹ûtext1.text=m1+m2µÄ»°  Ôòtext1ÏÔʾµÄÊÇ EF

µ«ÊÇÈç¹û
×Ö·û´® m1="E"
×Ö·û´® m2="6"
Èç¹ûtext1.text=m1+m ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ