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

ÇëÎʸöVBºÍEXCEL²Ù×÷µÄÎÊÌ⣬50·ÖÇóÖú - VB / »ù´¡Àà

VBÈçºÎ¶ÔEXCEL½øÐÐһϵÁеIJÙ×÷ÄØ£¬±ÈÈ磺½«VBÀïµÄÊý×éµÄÊý¾ÝÊä³öµ½EXCLEÀÈçºÎ½«ÕâЩÊý¾Ý½øÐÐÅÅÐò£¬É¸Ñ¡£¬±È½ÏÊý×é¼äÖØ¸´Êý»ò²»Öظ´ÊýµÈ²Ù×÷£¬¿É·ñ·¢Ð©ÊµÔÚµãµÄÀý×ÓÄØ£¬²»Ê¤¸Ð¼¤
lzµÄÊÇÒª¸ö½Ì³ÌÁË ½¨ÒéÄãÏȰÑexcelµÄºê¼Ç¼ÏÂÀ´¿´¿´

ÍÆ¼öÍÆ¼öexcelÂ¼ÖÆºê¡£

¿´¿´excelµÄ×Ô¶¯»¯

²é²é¿´£¬msdnÉÏÓкܶàÀý×Ó

Êý×éÊÇ¿ÉÒÔÖ±½ÓÌî³äµÄ 
VB code:
oWSheet.Range("L1:U1000") = a()

ÖÁÓÚÔõôɸѡ\ÅÅÐòÖ®Àà,ÔÚexcelÀïÂ¼ÖÆºê.

²Ù×÷Excel¼òµ¥Ò»µãµÄ·½·¨ÊÇÓÃOLE£¬Ò²¿ÉÒÔSQLµÄ·½Ê½£¬ÐèÒª¸ü¸´ÔӵŦÄÜ¿ÉÒԲο¼OFFICEµÄVBS±à³Ì£»


Ïà¹ØÎÊ´ð£º

vbµÄÀàÖÐʹÓÃ×Ô¶¨ÒåÀàÐÍÊý¾ÝµÄÎÊÌâ - VB / »ù´¡Àà


ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

vb - VB / »ù´¡Àà

ÔÚvbÖÐÈçºÎ¶ÁÈ¡WordÄÚÈÝ(°üº¬±í¸ñ£¬Í¼Æ¬£¬µÈ£©
¾¹È»²»ÊÇzero¡£

²»ÖªµÀÔõôʵÏֵIJ»ÒªËµ»°

Õâ¸öÖ»ÄܶÁÎı¾,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......

vb ÖÐ - VB / »ù´¡Àà

ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£
Õâ¸ö£¿¡£¡£¡£
Ã²ËÆÃ»·¨¡£
ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£
Ï´εã»÷µÄÈç¹ ......

vb - VB / »ù´¡Àà

Êý¾Ý¿âÀïÓÐÒ»¸ö×ֶεÄÄÚÈÝÊǶþ½øÖÆ£¬Ôõô²ÅÄܰÑÕâ¸ö¶þ½øÖƶÁ³öÀ´
ʹÓÃ×Ö½ÚÁ÷¶ÔÏó¿ÉÒÔʵÏÖ

ÀýÈçÏÖÔÚÊý¾Ý¿âÀïÓиö×ֶεÄÄÚÈÝÊÇ0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ