ÍÆ¼öһЩVBµÄѧϰ½»Á÷ÍøÕ¾
http://www.Experts-Exchange.com: ·Ç³£ºÃµÄÎÊÌâ ÌÖÂÛÇø£¬¸ßÊÖÊý²»¾¡£¬¶øÇÒÕâÀïµÄÈ˺ÜÓÐרҵ¾«Éñ£¬²»»áÌÖÂÛһЩºÍ³ÌÐòÎÞ¹ØÓÖÎÞÁĵÄÎÊÌâ¡£²»¹ýÏëÒª±ðÈ˰ïÄã ½â¾öÎÊÌ⣬×Ô¼ºÒ²ÒªÓÐÕæ³ÏµÄ̬¶È¡£
http://www.Codeguru.com/vb: ÓÐÃûµÄÔ´ÂëÌÖÂÛÕ¾ µã£¬ÌصãÊÇÔÚÿ¸öÔ´ÂëÏÂÃæ¶¼¿ÉÒÔ¸úÌûÌÖÂÛ¡£
http://www.planet-source-code.com/vb: ÓµÓдóÁ¿ µÄÔ´´úÂ룬ÊÇÐí¶à³ÌÐòÔ±°®È¥µÄµØ·½¡£
http://msdn.microsoft.com/code: ΢ÈíµÄʾÀýÔ´³ÌÐò¡£
http://www.allapi.net/: ÔÚÏß Win32 API Êý¾Ý¿â£¬ ²¢ÇÒÌṩÁËÒ»¸ö¿ÉÀëÏßʹÓÃµÄ API ä¯ÀÀÆ÷´úÌæÆ·£¬ÌصãÊDz»½ö¿ÉÒԲ鿴 API µÄÉùÃ÷£¬¶øÇÒÁ¬ MSDN ÀïµÄ˵Ã÷Ò²¼ÓÁËÉÏÈ¥£¬²¢ÇÒÄÚÈÝ¿ÉÒÔËæÊ±¸üе½×îа汾¡£
http://www.vbsquare.com: Ðí¶àÓÐÓõÄÔ´Âë¡¢ÎÊ´ðºÍ֪ʶµãµÈ¡£
http://www.vbwire.com: ÌṩÓйØVBµÄ×îÐÂÏûÏ¢¡£ http://www.zarr.net/vb: Ðí¶à VB Ô´ÂëºÍ¼¼ÇÉ¡£ http://www.vb2themax.com: Ìṩ´óÁ¿VB¼¼ÇÉ¡¢º¯
ÊýºÍÓÅ»¯¼¼Êõ¡£
http://www.mvps.org/vbnet/index.html: ÓÐÐí¶àʵ ÓõÄÔ´Â룬·ÖÀàÏêϸ¡£
Ïà¹ØÎĵµ£º
Visual BasicÓÐ×ÅÇ¿´óµÄÊý¾Ý¿â´æÈ¡ÄÜÁ¦£¬²»½öÄܹ»Ö±½ÓÖ§³ÖMs AccessÊý¾Ý¿â£¬¶øÇÒͨ¹ýÆäÄÚ²¿°²×°µÄISAMÇý¶¯³ÌÐòʹËüÄܼä½ÓÖ§³ÖFoxPro¡¢dBASEµÈÍâÀ´Êý¾Ý¿â¡£±¾ÎIJ»½ö´ÓVBÊý¾Ý¿âÌåϵ½á¹¹µÄ½Ç¶È̽Ë÷ÁËVB¶ÔÕâЩÍâÀ´Êý¾Ý¿âµÄÖ§³Ö£¬»¹½áºÏÁËһЩʵÀý¾ßÌå²ûÊöÁËʹÓÃÊý¾Ý¿â´æÈ¡¶ÔÏó±äÁ¿µÄ·½·¨ÊµÏÖÕâЩÍâÀ´Êý¾Ý¿âµÄн¨¡¢¿â½á¹¹Ð޸ġ¢ ......
°ÑÊó±êÒÆµ½ÆÁĻָ¶¨Î»Öà È磨111.111£© µ¥»÷Ò»ÏÂ
ÔÙÒÆµ½ÆÁÄ»ÁíÒ»Ö¸¶¨Î»ÖÃÖ¸¶¨Î»Öà È磨222.222£©µ¥»÷Ò»ÏÂ
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Private Declare Function SetCursorPo ......
ÔÚVBÖÐÒªÏëµ÷ÓÃExcel£¬ÐèÒª´ò¿ªVB±à³Ì»·¾³“¹¤³Ì”²Ëµ¥ÖеēÒýÓÔÏîÄ¿£¬²¢Ñ¡È¡ÏîÄ¿ÖеēMicrosoft Excel 11.0 object library”Ïî¡£ÓÉÓÚÄãµÄExcel°æ±¾²»Í¬£¬ËùÒÔÕâ¸öÑ¡ÏîµÄ°æ±¾ºÅÒ²ÊDz»Í¬µÄ¡£
ÒòΪEXCELÊÇÒÔ²ã´Î½á¹¹×éÖ¯¶ÔÏóµÄ£¬Æä¶ÔÏóÄ£ÐÍÖк¬ÓÐÐí¶à²»Í¬µÄ¶ÔÏóÔªËØ¡£
&n ......
Public Declare Function VarPtrArray Lib "msvbvm60.dll" Alias "VarPtr" (Var() As Any) As Long
Public Declare Function VarPtrStringArray Lib "msvbvm60.dll" Alias "VarPtr" (Var() As Any) As Long
È¡¶ÔÏóµØÖ·: ObjPtr
È¡OLE¶ÔÏóµÄµØÖ·: OLE_NAME.LpOleObject
È¡º¯ÊýµØÖ·: AddressOf
È¡×Ö·û´®µØÖ·: StrPtr
È¡ ......
Private Declare Function OpenThread Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwThreadId As Long) As Long
Private Const THREAD_ALL_ACCESS = &H1F03FF
OpenThread(THREAD_ALL_ACCESS, 1, Ïß³ÌID) 'ÓÉÏß³ÌIDÈ¡µÃÏ߳̾ä±ú,·µ»ØÏß³Ì¾ä± ......