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

vb msflexgrid¿Ø¼þÔõôÑùÁ¬sql2005Êý¾Ý¿â

лл

ÓÐûÓиßÊÖ´ó¸ç½Ì½Ì°³°¡



ÒýÓÃ
֮ǰ¸ø±ðÈËдÁ˸öÀý×Ó:
VB codeDim cnnAsNew ADODB.Connection
    cnn.ConnectionString="PROVIDER=MSDASQL;DRIVER={SQL Server};SERVER=192.168.1.100;DATABASE=database1;UID=sa;PWD=123"If cnn.State <> ADODB.ObjectStateEnum.adStateClosedThen cnn.Close
    cnn.OpenDim RsAs ADODB.RecordsetSet Rs=New ADODB.RecordsetWith RsSet .ActiveConnection= cnn
        .CursorLocation= adUseClient
        .CursorType= adOpenKeyset
        .LockType= adLockOptimistic
        .Open"SELECT good_code,customer,sum(price*amount)/sum(amount) AS avg_price from sales GROUP BY good_code,customer"If .RecordCount>0Then
            MSFlexGrid1.Clear
            MSFlexGrid1.Cols=3
            MSFlexGrid1.Rows= .RecordCount+1
            MSFlexGrid1.TextMatrix(0,0)="ÉÌÆ·±àºÅ"
            MSFlexGrid1.TextMatrix(0,1)="¹Ë¿ÍÃû³Æ"
            MSFlexGrid1.TextMatrix(0,2)="ƽ¾ù¼Û¸ñ"

            .MoveLast: .MoveFirstFor i=1To .RecordCount
   


Ïà¹ØÎÊ´ð£º

csvÎļþת»»³Ésqlµ¼Èëµ½Êý¾Ý¿â£¬Ã»ÓÐÊý¾ÝΪºÎ£¿

Ö´ÐеÄ˳Ðò£º
1£©Îļþä¯ÀÀ¿ò£¨Ñ¡ÔñÎļþʹÓã©
Ñ¡ÔñºÃÎļþºó
µã»÷Ò»¸öµ¼Èë°´Å¥µÄʱºò £¬°ÑÉÏÃæÉÏ´«¿òÀïµÄcsvÎļþÒÔÒ»¸öIDΪÎļþÃû£¬ÉÏ´«µ½**/**Îļþ¼ÐÏÂ
2£©¶ÁÈ¡Õâ¸öÎļþ¼ÐϵÄcsvµÄÎļþ£¬×ª»»³Ésql
3 ......

ΪʲôÓÃVB¸Ä±ä²»Á˹¤¾ßÀ¸°´Å¤µÄ¿í¶È - VB / ¿Ø¼þ

Ϊʲô¹¤¾ßÀ¸°´Å¤µÄ¿í¶È¸Ä±ä²»ÁË,ÔÚÊôÐÔÀï¸ÄÁËÓÖ±ä³ÉÔ­À´µÄÊýÖµÁË

´óºú×ÓÕæÀ÷º¦£¬»Ø´ð»ù±¾¶¼ÊDZ¬Áϼ¶µÄ
´óºú×ÓÉý¼¶Õæ¿ì°¡£¬Õâ²Å¼¸Ìì¾Í5Ìõ¶Ì¿ãÍâ¼ÓÔÂÅÅÃûµÚÒ»ÁË
ÏëÏëÎÒÕâ5¸ö¶Ì¿ã»ìÁ˲¶à8Äê²ÅµÃµ½µÄ¡£

»Ø¸´ ......

³õѧvb£¬Çë¸÷λ´óϺ¸øµã½¨Òé - .NET¼¼Êõ / VB.NET

¸Õ½Ó´¥vb6.0£¬ÓÐЩÃþ²»µ½µÄ¸Ð¾õ£¬¾´Çë¸÷λ´óϺ¸øµã½¨Ò飡£¡£¡
²»»á°É£¬ÍƼöѧϰ.NET¡£Ë³±ãÍÆ¼öʵÓôúÂëÍøÕ¾http://bingning.net/free/source/index.html¡£

Èç¹ûû»ù´¡ ¾ÍÓÃÒ×ÓïÑÔ°É ÖÐÎıà³ÌÄØ ´úÂë¶¼ÊÇÖÐÎÄ ......

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½Ó - VB / »ù´¡Àà

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½ÓÄØ£¿
  ÔÚWebBrowser¿Ø¼þÖÐÓÐÕâÑùÒ»¸öʼþ:StatusTextChange(index As Integer, ByVal Text As String)
  ËüµÄText²ÎÊýÕýÊÇÊó±ê´¦µÄ³¬¼¶Á¬½Ó,µ«ÎÊÌâÊÇÈç¹ûÎÒµÄä¯ÀÀÆ÷Õýà ......

ÇóÒ»sqlÓï¾ä - MS-SQL Server / ÒÉÄÑÎÊÌâ

ÏÖÔÚÓÐÁ½ÕÅ±í£ºÎÄÕÂÖ÷±íA(articleId,articleTitle)£¬ÎÄÕÂÆÀÂÛ±íB(commentId,articleId,commentTitle)
ÏÖÔÚÎÒÏëʵÏÖÕâÑùµÄ¹¦ÄÜ£ºÁгöÎÄÕÂÁÐ±í£¬ÆäÖÐÿƪÎÄÕ±êÌâÏÂÃæÁгö´ËÎÄÕµÄǰ2¸öÎÄÕÂÆÀÂÛ£¬ÇëÎÊsqlÓï¾äÔõôд°¡ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ