СÎÊÌ⣬VB²Ù×÷APIÏòÆäËü³ÌÐò´°Ìå·¢ËÍÏûÏ¢
·¢ËÍÏûÏ¢µÄʱºò£¬VBÈÝÒ×·ÇÕý³£Í˳ö
ÀýÈ磺WM_KEYDOWN WM_KEYUP
ÊÇVB¹ÌÓеÄȱÏÝ£¿»¹ÊÇÎҵĴúÂë²»ÑϽ÷ÄÇ£¿
ÆäËüÓïÑÔC#ÄܺõãÂð£¿
°Ñ´úÂëÌù³öÀ´¿´¿´°É£¬¿ÉÄÜÊÇÄãµÄ´úÂëÓÐÎÊÌâ
Tag = Form2.List1.List(37)
Call SendMessageLong(Tag, WM_KEYDOWN, VK_SPACE, 0&)
Call SendMessageLong(Tag, WM_KEYUP, VK_SPACE, 0&)
¾ÍÊÇÖ´ÐÐÕ⼸¾ä´úÂëʱVB±ÀÀ£µÄ£¬Tag¾ÍÊÇÁíÍâÒ»¸ö³ÌÐò´°ÌåÉÏÃæµÄÒ»¸ö°´Å¥£¨Button¿Ø¼þ£©£¬TagµÄÖµ¾ÍÊÇ
ÄǸö°´Å¥µÄHwnd(Õâ¸öÖµÊÇÈ·¶¨ÎÞÒÉÕýÈ·µÄ£©£¬Ö´ÐÐÒÔºó°´Å¥Äܹ»½ÓÊܰ´¼üµÄÏìÓ¦¡£
»¹ÐèÒªÆäËû´úÂëÂð£¿
ÌùÍêÕûЩ,°ÑÏàÓ¦µÄAPIº¯ÊýºÍÏûÏ¢ÉùÃ÷Ҳд³öÀ´,¿´¿´ÓÐûÓдí
Çë°Ñ´úÂëÌù³öÀ´´ó¼Ò¿´¿´
°ÑÄãµÄAPIÉùÃ÷ÌùÉÏÀ´°É
------Form1-------
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Private Const BN_CLICKED = 0
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVa
Ïà¹ØÎÊ´ð£º
ÏëÔÚwarcraft3Àï½øÐÐдÆÁ²Ù×÷¡¾Èç¶Ôսƽ̨ÖеÄʤ¸ºÌáʾÐÅÏ¢¡¿£¬Ð§¹û¾ÍÏñÓÎϷƽ̨ÖÐÒ»Ñù£¬ÎÒÊÔ¹ýÔÚÒ»´°¿ÚÖÐдÈëÎÄ×Ö£¬È»ºóÒ»Ö±Èô°¿ÚÇ¿ÖÆ×îǰ£¬ËäÈ»ÄÜʵÏÖÎÄ×ÖÏÔʾ£¬µ«ÊÇÎÄ×ֻ᲻¶ÏÉÁ˸£¬¶øÇÒÓв»È·¶¨BUG£¬Í¨¹ýÂÛ̳ËÑ ......
VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½ÓÄØ£¿
ÔÚWebBrowser¿Ø¼þÖÐÓÐÕâÑùÒ»¸öʼþ:StatusTextChange(index As Integer, ByVal Text As String)
ËüµÄText²ÎÊýÕýÊÇÊó±ê´¦µÄ³¬¼¶Á¬½Ó,µ«ÎÊÌâÊÇÈç¹ûÎÒµÄä¯ÀÀÆ÷Õýà ......
DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.
datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......
µã»÷°´Å¥ºóµ¯³ö½ø¶ÈÌõ´°¿Ú£¬ÒªÔÚ30%µÄʱºòÍ£¶Ù1Ãë 40%Í£¶Ù2Ã룬Ȼºó×ßÍê½ø¶ÈÌõºóÌáʾ±£´æ³É¹¦£¡
ÇëÎÊÈçºÎд£¿
½ø¶ÈÌõÓÃÄǸöVB6×Ô´øµÄprogressbar¿Ø¼þ,¶¨Ê±ÓÃtimer
ÎÒÔÚ±¾Õ¾ÕÒÁËÕ⼸¸öÌû,¹À¼Æ¹»ÄãÓÃ
http://topic ......