ÍÆ¼öһЩ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: ÓÐÐí¶àʵ ÓõÄÔ´Â룬·ÖÀàÏêϸ¡£
Ïà¹ØÎĵµ£º
°ïÅóÓѸĵÄһС¶Î¹Ø¼ü´Ê·ÖÎö´úÂ룻 º¬Á½¸öµ¥´Ê¸´ºÏ¼ÆÊý
Private Function CollectWords() As Dictionary(Of String, Integer)
'Create a new dictionary
Dim table As New Dictionary(Of String, Integer)
'Prompt for the user
Console.WriteLine(
"Enter a line : ")
'Get the user's input
Dim input As St ......
½ÌÄãÈçºÎÓÃVB×ö¿Ø¼þ*.ocx
Ò»¸ö¿Ø¼þÓкܶàʼþÈ磺Click¡¢MouseDown¡¢MouseUp¡¢MouseMoveµÈ¡£Òª´¥·¢ÕâЩʼþ¶¼ÐèÒªÄã¼ÓÈë´úÂë¡£ÔڿؼþµÄÉùÃ÷´¦¼ÓÈëPublic Event Click()¾Í±íÃ÷¸Ã¿Ø¼þÓÐÒ»“Click”ʼþ¡£×Ô¼º±àдµÄ¿Ø¼þÓÐʲôʼþ¾ÍÔÚÉùÃ÷´¦¼Ó¼¸Ìõʼþ
Èç½ñOCX¿Ø¼þÔÚ±à³ÌÖÐÒÑÕ¼ÁìÁ˺ÜÖØÒªµÄµØÎ»,ÎÒÃÇ¿ÉÒÔÀûÓÃOC ......
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 ......
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È¡µÃÏ߳̾ä±ú,·µ»ØÏß³Ì¾ä± ......