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

MSHFelxGrid Óë ACCESS MEMOÀàÐÍ×ֶεÄÒÉÎÊ

×î½ü×¼±¸Îª¹«Ë¾ÍøÕ¾ÓÃVB×ö¸ö²úƷչʾÉú³É£¬Éú³É²¿·Ö»ù±¾Ã»ÎÊÌ⣬
ÎÊÌâ³öÏÖÔÚ²éѯ²¿·Ö£¬Ê¹ÓÃÁËMSHFelxGrid(DATAGrid²»ÄÜÂú×ã²Ù×÷ÐèÇó)£¬±¾À´ÒÔΪÊÕ¹¤ÁË£¬×òÌìÔٴβâÊÔµÄʱºò·¢ÏÖÁËÒÔÏÂÎÊÌâ

µ±Êý¾Ý¿â×Ö¶ÎΪ¡°Memo(Access±¸×¢)¡±µÄʱºò£¬Ê¹ÓÃMSHFlexGrid1.TextMatrixÈ¡µÃµÄÖµ²¢²»ÍêÈ«£¬³¤¶ÈÖ»ÓÐ999¸ö×Ö·û¡­¡­À§ÈÅÁËÒ»Ì죬Çë¸ßÈËÃÇÀ´²âÊÔ²¢ËµËµ½â¾ö·½°¸¡£ÓÉÓÚÏ൱ԭÒò£¬ÅųýµôÐÞ¸ÄÊý¾Ý¿â×Ö¶ÎÀàÐ͵ķ½°¸¡£

Ô´ÂëÈçÏ£º
°üÀ¨¿Ø¼þ  textbox  x  1(¿É²»Òª£¬ÏÔʾ²âÊÔÓÃ),MSHFlexGrid  x  1,Label  x  1
Êý¾Ý¿âΪAccess,±íProductÄÚµÄSmallClassName×Ö¶ÎΪMemoÀàÐÍ£¬¼Ç¼Êý¾Ý³¬¹ý2000×Ö·û

Dim  con  As  New  ADODB.Connection
Dim  Gs  As  New  ADODB.Recordset

Private  Sub  Form_Load()
con.ConnectionString  =  "Provider=Microsoft.Jet.OLEDB.4.0;Data  Source= "  &  App.Path  &  "/DB.mdb;Persist  Security  Info=False "
con.Open
Gs.CursorLocation  =  adUseClient
Gs.Open  "select  *  from  product  where  smallClassName  like  '% ' ",  con,  1,  1
Set  MSHFlexGrid1.DataSource  =  Gs
Gs.Close
Text1.Text  =  MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row,  1) 'ÏÔʾ²âÊÔÓ㬿ɺöÂÔ¸ÃÐÐ


Ïà¹ØÎÊ´ð£º

ACCESSÊý¾Ý¿âÓëVB¿ª·¢µÄÈí¼þ½øÐл¥Á¬ÍøÁ¬½Ó

±¾À´ÎÒÊÇÓÃACCESS+VB½¨Á¢Ò»¸öÈí¼þ£¨¾ÖÓòÍø£©£¬ÏÖÔÚÓÉÓڰ칫µØµãÓб䶯£¬Ïà»»³ÉINTERNATµÄ£¬ÓÐûÓа취½â¾ö£¬

ÏóÕâÑùµÄÇé¿ö£¬Èç¹ûÊǹãÓòÍø£¬×îºÃ¸Ä³É£ºB\SµÄ
Èç¹ûÊǾÖÓòÍøµÄ£¬×îºÃ¸Ä³É£ºC\SµÄ
http://downlo ......

access ²éѯ¼Ç¼µÄÎÊÌâ?

ÎÊÌâÈçÏ£º

ÓòéѯÓï¾ä
select * from tab where fil like 'CK090902'ÄܲéÕÒ³öÒ»Ìõ¼Ç¼²¢ÏÔʾ³öÀ´
¸ÄΪ
select * from tab where fil = 'CK090902'
¾Í²»ÄܲéÕÒµ½£¬Ò²ÏÔʾ²»³öÀ´ ......

SQL2000ÈçºÎ´´½¨ACCESS±í

SELECT *
from OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="C:\Documents and Settings\**\My Documents\cc.mdb";User ID=Admin;Password=')...a

ÎÒÖ»ÖªµÀ ......

ADOÎÞ·¨Á¬½ÓaccessÊý¾Ý¿âÎÊÌâ

ÎÒдÁËÒ»¸ömfc³ÌÐò£¬ÊÇsdiµÄ¡£ÊÓͼÊÇCformviewµÄÅÉÉúÀà¡£
ÎÒÏëʵÏÖÈÎÒâÁ¬½ÓÊý¾Ý¿âµÄ¹¦ÄÜ¡£ËùÒÔÔÚÊÓͼÉÏÌí¼ÓÁËÒ»¸ö°´Å¥¡£µã»÷°´Å¥£¬´ò¿ª¶Ô»°¿òÑ¡ÔñÊý¾Ý¿â½øÐÐÁ¬½Ó¡£´úÂëÈçÏÂËùʾ:

ÎÒÏÈÔÚstdafx.hÎļþÖмÓÁË ......

ÇóACCESSÊý¾Ý¿â

      ÄÄλ´ó¸çÓÐACCESSÊý¾Ý¿â °¡£¿
  ¸øÐ¡µÜÒ»¸ö£¡
°²×°OFFICEʱѡÔñ°²×°ACCESS

°²×°OFFICEʱѡÔñ°²×°ACCESS

°²×°°ì¹«Èí¼þ£¬Ñ¡Ôñ×Ô¶¨Òå°²×°£¬È»ºóÑ¡ÉÏACCESS¾Í¿ÉÒÔÁË

officeÍêÕ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ