vb+ACCESS - VB / Êý¾Ý¿â(°üº¬´òÓ¡£¬°²×°£¬±¨±í)
    
	
	   ÓиöÎÊÌ⣬ÎÒÓиöÊý¾Ý¿â£¨ACCESS£©£¬ÆäÖÐÓиö±í£¬±íÀïÃæÓÐÁ½¸öÁÐÃû£¨ÊéÃû¡¢µ¥¼Û£©£¬ÎÒÔõôÓÃvbÀ´¶ÁÈ¡±íÖеĵ¥¼ÛµÄËùÓмǼ£¨Ò²¾ÍÊÇÕâÒ»ÁУ©£¬²¢ÇóºÍ£¬ÏÔʾÔÚvbµÄtextÉÏÃæ¡£
    ¸÷λ¸ßÊÖ£¬¹ØºõÉúÃü£¬ÎÒÔÚÏߵȣ¡Çë¼±»ØÌû£¡
sqlÓï¾äÈçÏ£º
select µ¥¼Û from ±í  '---ËùÓмǼ
select sum(µ¥¼Û) from ±í  '---ËùÓмǼÇóºÍ
Ìí¼ÓADODC¿Ø¼þÓÃÒÔÉÏSqlÓï¾äȥʵÏÖ£¬¾ßÌå´úÂëÍøÉ϶àµÄÏóţë¡£
  ÄÜÏêϸµãô£¿
   Adodc1.CommandType = adCmdText
    Adodc1.CursorLocation = adUseClient
    Adodc1.Refresh
    Text1.Text = Adodc1.Recordset.Fields(0)
    ¸ßÊÖ£¬ÒÔÉϼ¸¾äʲôÒâ˼£¿
   ÎÒÉÏÍø²éÁ˲飬ÇëÎʸßÊÖÃÇ£¬ÎÒÏëÓÃÆÕͨµÄ·½·¨À´ÏÔʾһÁеĺÍÔõô°ì£¿
     Dim cnn As New ADODB.Connection
     Dim appdisk As String
     Dim db As String
     Dim ss As String
     Dim biaoji As Integer
      
     appdisk = IIf(Right(App.Path, 1) = "\", App.Path, App.Path & "\")   
     db = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & appdisk & "shujuku.mdb"
     cnn.CursorLocation = adUseClient
     cnn.Open db '´ò¿ªÊý¾Ý¿âÁ¬½Ó
      
      
     cnn.Execute (¡£¡£¡£¡£)
     cnn.Close
ÔÚÏßµÈѽ£¬Ï£Íû¸ßÊִͽ̣¡
'
'
'
dim rst as new adodb.
    
 
	Ïà¹ØÎÊ´ð£º
        
    
    ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£
Õâ¸ö£¿¡£¡£¡£
Ã²ËÆÃ»·¨¡£
ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£
Ï´εã»÷µÄÈç¹ ......
    
        
    
    Êý¾Ý¿âÀïÓÐÒ»¸ö×ֶεÄÄÚÈÝÊǶþ½øÖÆ£¬Ôõô²ÅÄܰÑÕâ¸ö¶þ½øÖƶÁ³öÀ´
ʹÓÃ×Ö½ÚÁ÷¶ÔÏó¿ÉÒÔʵÏÖ
ÀýÈçÏÖÔÚÊý¾Ý¿âÀïÓиö×ֶεÄÄÚÈÝÊÇ0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......
    
        
    
    ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
  xm ......
    
        
    
    ʹÓÃACCESS×î´óµÄÒþ»¼¾ÍÊDz»°²È«¡£½ñÌì¶ÔACCESSÊý¾Ý¿âÉèÖÃÁËÒ»¸öÃÜÂ룬±ØÐëʹÓÃÃÜÂë²ÅÄÜ´ò¿ª£¬µ«ÊÇÔÚ³ÌÐòÖÐÈ´ÎÞ·¨Á¬½ÓÊý¾Ý¿âÁË¡£´ó¼ÒÖªµÀʹÓÃÓû§ÃûºÍÃÜÂ룬ÈçºÎÁ¬½ÓACCESSÊý¾Ý¿â£¿Ã²ËÆACCESSµÄÓû§Ãû»¹²»ÖªµÀ£¿Ö»Öª ......
    
        
    
    ÈçºÎ½«Ò»¸öListBoxÖеÄÊý¾Ý´æÔÚÊý¾Ý¿âÖеÄÒ»¸ö×Ö¶ÎÏÂÃæ£¬²¢ÇÒÿÌõ¼Ç¼µÄ×Ö·û´®¸öÊý²»Ò»¶¨   ÒÔ¼°ÈçºÎ´ÓÊý¾Ý¿âÖжÁÈ¡¸ÃListBoxÖеÄËùÓмǼ
C/C++ code: 
//´æÈëÊý¾Ý¿â
void __fastcall TForm1::Button5Click(TO ......