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

VB³ÌÐòÖÐÓÃADO¶ÔÏó¶¯Ì¬´´½¨Êý¾Ý¿âºÍ±í

    ÕªÒª£º ±¾ÎIJûÊöÁËÔÚVB³ÌÐòÖÐÀûÓÃADO¶ÔÏó¶¯Ì¬´´½¨Êý¾Ý¿âºÍÊý¾Ý±íµÄ·½·¨£¬ÕâЩ·½·¨ÔÚ¿ª·¢VBÊý¾Ý¿âÓ¦ÓóÌÐòÖкÜÓÐʵÓüÛÖµ£¬Ëü¿ÉÒÔÌá¸ßÊý¾Ý¿â³ÌÐòÁé»îÐÔ¡£
¡¡¡¡¹Ø¼ü´Ê£ºÊý¾Ý¿â¡¢Êý¾Ý±í¡¢ADO¡¢ADOX
¡¡¡¡1: ÎÊÌâµÄÌá³ö
¡¡¡¡ÔÚVisual BasicÖУ¬³£ÓõÄÊý¾Ý·ÃÎʽӿÚÓÐÏÂÁÐÈýÖÖ£ºÊý¾Ý¿â·ÃÎʶÔÏó(DAO£¬Data Access Object)¡¢Ô¶³ÌÊý¾Ý¿â¶ÔÏó(RDO£¬Remote Data Object)ºÍActiveXÊý¾Ý¶ÔÏó(ADO£¬ActiveX Data Object )¡£Êý¾Ý¿â·ÃÎʼ¼ÊõÒ»Ö±ÔÚ²»¶Ï½ø²½£¬¶øÕâÈýÖÖ½Ó¿ÚµÄÿһÖÖ¶¼·Ö±ð´ú±íÁ˸ü¼ÊõµÄ²»Í¬·¢Õ¹½×¶Î¡£×îеÄÊÇADO£¬ËüÊDZÈRDOºÍDAO¸ü¼Ó¼òµ¥£¬È»¶ø¸ü¼ÓÁé»îµÄ¶ÔÏóÄ£ÐÍ¡£ÕýÒòÈç´Ë£¬Ô½À´Ô½¶àµÄÈËÔÚÓÃVB¿ª·¢Êý¾Ý¿âÈí¼þʱʹÓÃADO×÷ΪÊý¾Ý·ÃÎʽӿڡ£ÔÚ¿ª·¢¹ý³ÌÖУ¬ÎÒÃÇͨ³£µÄʹÓõķ½·¨ÊÇ£ºÏÈʹÓÃÊý¾Ý¿â¹ÜÀíϵͳ(ÀýÈ磺Microsoft Access)»òVBÖеĿÉÊÓ»¯Êý¾Ý¹ÜÀíÆ÷½¨Á¢ºÃÊý¾Ý¿âºÍÊý¾Ý±í½á¹¹£¬È»ºóÔÚ³ÌÐòÖÐͨ¹ýʹÓÃADODCÊý¾Ý¿â¿Ø¼þ»òÒýÓÃADO¶ÔÏóÓëÊý¾Ý¿âÖÐµÄ±í½¨Á¢Á¬½Ó£¬ÔÙͨ¹ýÊý¾Ý¿â¸ÐÖª¿Ø¼þ(ÀýÈ磺Îı¾¿ò¡¢DataGridµÈ)À´½øÐÐÊý¾Ý¿âµÄ¸÷ÖÖ²Ù×÷¡£ÔÚÕâÖÖ¿ª·¢¹ý³ÌÖУ¬ÎÒÃÇÓÐʱÐèÒªÃæ¶ÔÕâÑùÒ»¸öÎÊÌ⣺ÈçºÎÈÃÓû§ÔÚ³ÌÐòÔËÐйý³ÌÖж¯Ì¬µØ½¨Á¢×Ô¼ºËùÐèµÄÊý¾Ý¿âºÍÊý¾Ý±íÒÔÌá¸ß³ÌÐòµÄÁé»îÐÔÄØ£¿ÔÚ³ÌÐòÔËÐйý³ÌÖн¨Á¢×Ô¼ºËùÐèµÄÊý¾Ý¿âºÍÊý¾Ý±í£¬Æä±¾ÖʾÍÊÇÓôúÂë(»òÕß˵ͨ¹ý±à³Ì)À´½¨Á¢Êý¾Ý¿âºÍÊý¾Ý±í¡£ÖÚËùÖÜÖª£¬ÔÚFoxpro»òASP±à³ÌÖУ¬ÕâÊǺÜÈÝÒ×µÄÒ»¼þʼþ¡£ÄÇôÔÚVBÊý¾Ý¿â±à³ÌÖÐÓÖÊÇÔõÑùÀ´²Ù×÷µÄÄØ£¿ÔÚVBÊý¾Ý¿â±à³ÌÖУ¬Èç¹ûʹÓÃDAO×÷ΪÊý¾Ý¿â·ÃÎʽӿڼ¼Êõ£¬Ôò¿ÉÒÔÓÃCreateDatabase½áºÏCreateTableDef·½·¨À´ÊµÏÖ£¬Ä¿Ç°ÒÑÓв»ÉÙÊéºÍÔÓÖ¾¶¼½²µ½ÁËÕâÖÖ·½·¨£¬±¾ÎľͲ»ÔÙ½²ÊöÁË£»µ«ÄãÈç¹ûʹÓõÄÊÇ×îеÄÊý¾Ý¿â·ÃÎʽӿڼ¼ÊõADO£¬ÄãÈ´·¢ÏÖĿǰµÄÊéºÍÔÓÖ¾ÉÏûÓÐÎÄÕ½²µ½ÈçºÎÓôúÂëÀ´½¨Á¢Êý¾Ý¿âºÍÊý¾Ý±íµÄ·½·¨£¬¿ÉÓÐʱÎÒÃǷdz£ÐèÒªÓõ½ÕâÖÖ·½·¨£¬ÏÂÃæÎÒÃǾÍÀ´½â¾öÕâ¸öÎÊÌâ¡£
¡¡¡¡2: ADOÓëADOX
¡¡¡¡ÎÒÃÇÏÈÀ´¶ÔADO ºÍADOX½øÐмòµ¥µÄÈÏʶ¡£ÔÚVB6ÖУ¬Ê¹ÓÃADO¿ª·¢Êý¾Ý¿âÓ¦ÓóÌÐòʱ£¬ÎÒÃÇÒªÒýÓöÔÏó¿â"Microsoft ActiveX Data Objects 2.5 Library"£¬ Õâ¸ö¶«Î÷µÄ¼ò³Æ¾ÍÊÇADO£¬ËüÊÇVB6Êý¾Ý¿â×îºËÐĵĶÔÏóȺ£¬Ò²ÊÇVBÊý¾Ý¿â¿ª·¢ÈËÔ±¾­³£ËùÒýÓõĶÔÏó¿â£¬ÔÚVB6ÖÐÄã¿ÉÒÔ¿´µ½ËüµÄ¸÷ÖÖ°æ±¾£¬´Ó2.0°æµ½2.6°æ¶¼ÓУ¬ºÜ¶àÈ˶ÔËüÒѾ­ºÜÊìϤ£¬ÔÚ´ËÎÒÃDz»ÔÙÏêϸ½éÉÜ¡£Èç¹ûÒªÔÚ³ÌÐòÔËÐйý³ÌÖд´½¨Êý¾Ý¿âºÍ±í£¬ÎÒÃÇ»¹ÒªÒýÓöÔÏó¿â"Microsoft ADO Ext 2.1. For DDL Security"£¬¼ò³


Ïà¹ØÎĵµ£º

VB ·¢ËÍÄ£Äâ°´¼ü

Dim ReturnValue, I
ReturnValue = Shell("Calc.EXE", 1) ' ÔËÐмÆËãÆ÷¡£
AppActivate ReturnValue ' ¼¤»î¼ÆËãÆ÷¡£
For I = 1 To 100 ' ÉèÖüÆÊýÑ­»·¡£
SendKeys I & "{+}", True ' °´Ï°´¼ü¸ø¼ÆËãÆ÷
Next I ' ½«ËùÓÐ I ÖµÏà¼Ó¡£
SendKeys "=", True ' È¡µÃ×ܺϡ£
SendKeys "%{F4}", True ' °´ ALT+F4 ¹Ø ......

Ê®Ììѧ»áASP.net֮ʵսϵÁУ¨C#ºÍVb.netË«°æ±¾£©

Ê®Ììѧ»áASP.net֮ʵսϵÁУ¨C#ºÍVb.netË«°æ±¾£©
µÚÒ»Ìì
  ÎÒÈÏΪASP.NET±ÈASPÄѺܶ࣬ϣÍû´ó¼Ò×öºÃ×¼±¸¡£ÄÑÄÑÔÚʵÏÖͬһ¸öЧ¹ûÓкܶ෽·¨£¬´ó¼Ò»òÐí»áÒÉ»ó¡£Ê®Ììѧ»áϵÁн̳̻áÇåÎúµÄд³ö¸÷ÖÖ·½·¨£¬Èôó¼ÒÄÜÉÙÒ»µã¿²¿À¡£ÔÚASPÀïÃæ£¬´ó¼Ò¼¸ºõ¶¼ÊÇʹÓÃVB£¬Êý¾Ý¿âÂҲÎÞ·ÇÊÇSQLºÍACCESS¡£ÔÚASP.NETÀïÃæ£¬Êý¾Ý¿â»¹ÊÇÕ ......

¹ØÓÚVBµÄListBox¿Ø¼þÑ¡¶¨ÏîµÄ»ñÈ¡

 ½ñÌìÔÚ×öVBÏîÄ¿µÄʱºò£¬Ê¹ÓÃÁËListBox¿Ø¼þÀ´»ñȡһЩÁбíÏÓÃÁ˲ŷ¢ÏÖûÓÐListViewºÃÓã¬ListViewÓÐItems£¨SelectItem£©¿ÉÒÔ¶¨Î»µ½µ±Ç°µÄÑ¡ÖÐÏ¶øListBoxûÓУ»ListViewÓÐTag¿ÉÒÔÉ趨ѡÖÐÏîµÄ±êʾ£¬ListBoxûÓС£ÉÏÍøÒ²ÕÒ²»µ½Ô­Òò£¬ÖªµÀÈ¥ÔĶÁMSDNºÍ×Ô¼º²âÊÔ¡£
Ö®ºóÖÕÓÚÕÒµ½ÁËÎÊÌâµÄ¹Ø¼ü¡£
ʼþ1£ºÌí¼ÓListBoxÏ ......

vbµ÷ÓÃexcel·½·¨´óÈ«

ÔÚVBÖÐÒªÏëµ÷ÓÃExcel£¬ÐèÒª´ò¿ªVB±à³Ì»·¾³“¹¤³Ì”²Ëµ¥ÖеēÒýÓÔÏîÄ¿£¬²¢Ñ¡È¡ÏîÄ¿ÖеēMicrosoft Excel 11.0 object library”Ïî¡£ÓÉÓÚÄãµÄExcel°æ±¾²»Í¬£¬ËùÒÔÕâ¸öÑ¡ÏîµÄ°æ±¾ºÅÒ²ÊDz»Í¬µÄ¡£
    ÒòΪEXCELÊÇÒÔ²ã´Î½á¹¹×éÖ¯¶ÔÏóµÄ£¬Æä¶ÔÏóÄ£ÐÍÖк¬ÓÐÐí¶à²»Í¬µÄ¶ÔÏóÔªËØ¡£
&n ......

VBÖеõ½ÆÁĻ֧³ÖµÄ·Ö±æÂʺÍɫλ

http://topic.csdn.net/t/20030306/11/1497896.html#
 ¹¤³ÌÎļþÃû£ºChdsp.vbp  
Type=Exe
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\PWIN95\SYSTEM\\STDOLE2.TLB#OLE Automation
Module=Module1; ChDsp.bas
Form=ChDsp.frm
Startup="Form1"
He ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ