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

ÔÚÏߵȣ¡vb ¹ØÓÚÊý×é±ä»¯µÄά¶È - VB / »ù´¡Àà

¾ÍÊÇÎÒ¶¨ÒåÊý×é
dim a£¨1 to 2£¬1 to b£©as long

ÆäÖÐbÒ»¸ö¶¯Ì¬µÄÖµ

ÎÒÏëʵÏÖÕâ¸ö¹¦ÄÜ£¬µ«ºÃÏñvb²»Ö§³Ö¶ÔÊý×éά¶ÈÕâÖÖ·½Ê½µÄдÈë¡£

²»ÖªÄÄλ´ïÈËÓа취ʵÏÖ£¬Ð»Ð»£¡ 

ÎÒÊdzõѧ£¬Çë´ó¼Ò¶à¶à°ï棬ÏÈлл´ó¼ÒÁË¡£



ÏÈллÄú£¡ÎÒÕâ¾ÍÈ¥ÊÔÊÔ£¡

VB code:
Dim a() As Long, b As Long
ReDim a(1 To 2, 1 To 20) 'Èç¹ûÔ­Ïȶ¨Òå¹ý
b = 30
ReDim Preserve a(1 To 2, 1 To b) 'ÓÃPreserve¿ÉʹÊý×éÊý¾Ý²»±»¶ªÊ§


¶þάÊý×é²»ÄÜÄÇô¶¨Ò嶯̬Êý×飬»¹ÊÇÓÃREDIM°É£¬ÏÈÈ·¶¨ÄãÒªÌî½øÈ¥µÄÊý¾ÝÐÐÁÐ

ÒýÓÃ

VB code
Dim a() As Long, b As Long
ReDim a(1 To 2, 1 To 20) 'Èç¹ûÔ­Ïȶ¨Òå¹ý
b = 30
ReDim Preserve a(1 To 2, 1 To b) 'ÓÃPreserve¿ÉʹÊý×éÊý¾Ý²»±»¶ªÊ§



Ïà¹ØÎÊ´ð£º

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


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

vb¶ÁÈ¡xml - VB / »ù´¡Àà

ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xm ......

vb²Ù×÷excel - VB / »ù´¡Àà

ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
  A 3
  A 4
  B 6
  ... ......

vbÖÐunicodeÂë,ÈçºÎת»»³ÉÎı¾ - VB / »ù´¡Àà

ÓÃVB±à³Ì¶ÁÈ¡¶ÌÐÅ,µÃµ½Ò»´ó¶Ñunicode±àÂë,Çë½ÌÈçºÎת»»³ÉÎı¾
ÀýÈç:¶ÁÈ¡¶ÌÐźó(»ªÎª900C»òTC35i),´®¿ÚµÃµ½ÈçÏÂÊý¾Ý:
+CMGL: 17,"REC UNREAD","8615007557713",,"10/03/30,09:37:15+32&qu ......

vbÒì²½ÎÊÌâ - VB / »ù´¡Àà

ÏÖÔÚСµÜÔÚÓÃvb6.0±àд³ÌÐò£¬Óöµ½Òì²½µÄÎÊÌ⣬¾ßÌåÈçÏ£º
µã»÷°´Å¥Aʱ£¬µ÷ÓÃÍⲿµÄdll(C++)£¬´ËdllÊÇͬ²½·µ»ØÊý¾Ý¡£´ËʱÈç¹ûÔ¶³ÌδÏìÓ¦£¬ÎҵijÌÐò½çÃæ¾Í»á¿¨ËÀ¡£Òò´ËÎÒÏëµ½ÓÃtimerÀ´ÊµÏÖÒì²½ £¬µ«ÊDz»Çå³þ¾ßÌåµÄÊµÏ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ