ÔÚÏߵȣ¡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¿ÉʹÊý×éÊý¾Ý²»±»¶ªÊ§
Ïà¹ØÎÊ´ð£º
DIM ds as new DataSet ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿ ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ. datasetÊÇADO.NET¶ÔÏó Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......
dim a as string,b as string£¬c as string a="¹¤³Ì±àºÅ,µ¥Î»¹¤³ÌÃû³Æ,·Ö²¿¹¤³Ì±àºÅ" b="µ¥Î»¹¤³ÌÃû³Æ" c="µ¥Î»" Ôõô²ÅÄÜÅжϳöa×Ö·û´®ÖдæÔÚb×Ö·û´®£¬¶ø²»´æÔÚc×Ö·û´® ¿´¿´i ......
ËÄܰïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~ #include "stdlib.h" #include "math.h" #include "stdio.h" float objfx(float x[]); void constraint(float x[],float g ......
ÕÒÁ˺ܾÃÕâ¶«Î÷ÁË, ÓÃtreeview²»ÄÜÂú×ãÒªÇó ÏÖÔÚÏë×öµÄÊÇ£º½çÃæÒÔÊ÷ÐÎÕ¹ÏÖ£¬Äܲ»ÄÜÕ¹¿ªÊÕ»ØÎÞËùν ½Úµã¶¼¿ÉÒÔ°´Õչ涨½øÐÐÌíɾ ÿ¸ö½ÚµãºóÃæ¶¼¿ÉÄÜ»á³öÏÖ Îı¾ ......
СµÜÓÃVBµ÷EXCEL×÷ͼ objExlApp.Workbooks.Add objExlApp.Charts.Add objExlApp.ActiveChart.ChartType = xlLine objExlApp.ActiveChart.HasLegend = True objExlApp. ......