| ²é¿´: 239 | »Ø¸´: 4 | |||
| µ±Ç°Ö÷ÌâÒѾ´æµµ¡£ | |||
liangduoqiangÌú³æ (ÕýʽдÊÖ)
|
[½»Á÷]
¹ý³ÌµÄÊ®Îå´ó¿´·¨¡£
|
||
|
1£©functionºÍsub¹ý³Ì¶¼ÄÜÒÔÈÎÒâ×éºÏǶÌ×£¬µ«²»ÄÜÒÔÈκÎÐÎʽÔÙ¡°¶¨ÒåǶÌס±£¨±ÈÈ磬²»ÄÜÔÚsub¹ý³ÌÖÐÔÙ¶¨ÒåsubºÍfunction¹ý³Ì£©¡£ 2£©¶ÔÓÚfunctionºÍsub¹ý³Ì£¬ËüÃǵÄÐβοÉÒÔÊÇÈÎÒâÀàÐÍ£¨°üÀ¨¶ÔÏ󣩡£ 3£©function¹ý³Ì¿ÉÒÔ¶¨ÒåΪ×Ö·ûÐÍÊý¾Ý£¨¹Ì¶¨³¤¶È³ýÍ⣩£¬ÇëÎÊ¡°¹Ì¶¨³¤¶È¡±ÈçºÎ½ç¶¨£¿ 4£© function¹ý³Ì¿ÉÒÔ¶¨ÒåΪÈκÎÀàÐÍ£¬³ýÁËö¾ÙÀàÐÍÒÔÍâ¡£ 5£© ¶ÔÓÚfunctionºÍsub¹ý³Ì£¬µ±ÓÃÊý×é×÷Ϊ¹ý³ÌµÄ²ÎÊýʱ£¬½øÐеIJ»¡°Öµ¡±µÄ´«µÝ£¬¶øÊÇ¡°Ö·¡±µÄ´«µÝ¡£Çé¿ö±È½ÏÌØÊ⣬²ÎÊý±ØÐë¶¼ÊÇ¡°Êý×éÃû+¿ÕÀ¨ºÅ¡±£¬µ«²¢²»ÒòΪÕâÑù¾Í¿ÉÒÔÈÏΪËüÃǶ¯Ì¬Êý×飬ËüÃÇÈÔÈ»ÊǾ²Ì¬Êý×飬¿ÉÒÔËæÊ±½øÐÐÊý×éÔªËØµÄ´¦Àí¡£²»¹ýÒªÔÚ´¦Àíǰ£¬ÏȲâÊÔÉϽ磬²ÅÄÜʹÓÃÑ»·Óï¾ä£¬·ñÔòÖ»ÄÜÓà for each nextÓï¾ä¡£ 6£©vb¶ÔÏóÀàÐÍÖеġ°Microsoft equation 3.0¡±ºÍwordÖеġ°Microsoft equation 3.0¡±Ã»ÓдóÇø±ð£¬ÉõÖÁ¿ÉÒÔ˵£¬ËüÃÇÊÇÒ»ÑùµÄ£¬¶¼ÊÇ΢ÈíµÄºËÐļ¼Êõ¡£ 7£©function¹ý³Ì¿ÉÒÔ¿´×÷ÊÇÓû§×Ô¶¨ÒåÒ»¸öº¯Êý£¨×÷ΪÄÚ²¿º¯ÊýµÄÒ»ÖÖ²¹³ä£©£¬sub¹ý³Ì¿ÉÒÔ¿´×÷ÊÇ×Ô¶¨ÒåÒ»¸ö¹ý³Ì£¨°Ñ³£Óùý³Ìµ¥¶À³é³öÀ´£¬×÷Ϊ¼ò»¯³ÌÐòµÄ·½·¨Ö®Ò»£©¡£ 8£©Ê¹ÓÃfunction¹ý³Ì¿ÉÒÔʵÏֵŦÄÜ£¬Ò²¿ÉÒÔÓÃsub¹ý³ÌʵÏÖ£¬ËùÒÔfunction¹ý³ÌÓб»ÌÔ̵ÄΣÏÕ¡£ 9£©Ïósub¹ý³ÌÒ»Ñù£¬function¹ý³ÌÒ²¿ÉÒÔʹÓÃcallÃüÁî¡£¡£ 10£©µ÷ÓÃSub¹ý³ÌÓÐÒÔÏÂÁ½ÖÖ·½·¨£º (1)ʹÓÃCallÓï¾ä¡£¸ñʽ£ºCall ¹ý³ÌÃû(£Ûʵ²Î±í£Ý) (2)Ö±½ÓʹÓùý³ÌÃû£¬¸ñʽ£º¹ý³ÌÃû£Ûʵ²Î±í£Ý¡£µ«ÊÇÒ²ÓÐÀýÍâµÄÇé¿ö£¬Èç¹û²ÎÊýÊÇ´°Ì壬ÄÇôsub¹ý³ÌÏ൱¸Ä±ä´°ÌåµÄÊôÐÔ£¬ÄÇô¿ÉÒÔÖ±½ÓÓÃsub¹ý³ÌÃû×÷ΪÊôÐÔ£¬±ÈÈçform1.formset(form2)£¬´Ëʱ£¬ÓÃsub¹ý³Ì£¨Ò²¾ÍÊÇformset£©¶¨ÒåµÄÊôÐÔÏÈÓÃÓÚform1£¬ÔÙÓÃÓãform2¡£Èç¹û²ÎÊýÊǿؼþ£¬ÄÇôsub¹ý³ÌÏ൱¸Ä±ä¿Ø¼þµÄÀàÐÍ£¬ÄÇô¿ÉÒÔÖ±½ÓÓÃsub¹ý³ÌÃû×÷Ϊ¶ÔÏ󣬱ÈÈçctrtest.caption=¡±kitty¡±¡£ÒÔÉ϶ÔÓÚ²ÎÊýΪ¶ÔÏóµÄsub¹ý³Ì£¬»¹¿ÉÒÔÖ±½ÓÔÚ±í´ïʽµ÷ÓÃsub¹ý³Ì¡£ 11£© ¹ý³ÌµÝ¹éµ÷ÓÃÖУ¬×îÖØÒªµÄÊÇÕÒ³öÖÕÖµ¼ÆËãµÄÌõ¼þºÍÒÀ´ÎÁ½´Î½á¹ûÖ®¼äµÄ¹ØÏµ¡£ 12£©¡°ÀàÄ£¿é¡±µÄÄÚÈݽÏÄÑ£¬·Ç¼ÆËã»úרҵµÄ±¾¿ÆÉúÃâÐÞ¡°ÀàÄ£¿é¡±¡£ 13£©Èç¹ûÐβαíÖÐʹÓÃÁ˹ؼü´Êparamarray,ÔòÆäËûÈκÎÀàÐͲÎÊý¶¼²»ÔÙʹÓùؼü´Êoptional¡£Õâ¸öÔÒòºÜ¸´ÔÓ£¬ÖÁ½ñ΢Èí¶¼Ã»×ö³ö½âÊÍ¡£ËùÒÔÖ»ÄÜËÀ¼ÇÓ²±³¡£ 14£©È«¾Ö±äÁ¿ÒªÔÚ´°ÌåÄ£¿éºÍ±ê׼ģ(.bas)ÖеÄͨÓÃÉùÃ÷¶ÎÓÃGlobal»òPublicÓï¾äÀ´ÉùÃ÷¡£¶ø²»ÊǽöÏÞÓÚ±ê׼ģ(.bas)ÖеÄͨÓÃÉùÃ÷¶Î¡£GlobalÓï¾äºÍPublicÓï¾ä£¬×÷ÓÃÍêÈ«Ïàͬ¡£ 15£©Ä£¿é¼¶±äÁ¿ÓÃdimºÍprivateÉùÃ÷µÄЧ¹ûûÓÐʲô´óÇø±ð£¬µ« Private ¸üºÃЩ£¬ÒòΪºÜÈÝÒ×°ÑËüºÍ Public Çø±ð¿ªÀ´£¬Ê¹´úÂë¸üÈÝÒ×Àí½â¡£ ÉÏÃæ¿´·¨¶Ô·ñ£¬ÇëÖ¸Õý£¬Çë²¹³ä£¬Ð»Ð»£¡ |
» ²ÂÄãϲ»¶
¡¾¿¼Ñе÷¼Á¡¿»¯Ñ§×¨Òµ 281·Ö£¬Ò»Ö¾Ô¸ËÄ´¨´óѧ£¬³ÏÐÄÇóµ÷¼Á
ÒѾÓÐ5È˻ظ´
ÄÜÔ´²ÄÁÏ»¯Ñ§¿ÎÌâ×éÕÐÊÕ˶ʿÑо¿Éú8-10Ãû
ÒѾÓÐ12È˻ظ´
288Çóµ÷¼Á
ÒѾÓÐ10È˻ظ´
0703»¯Ñ§µ÷¼Á
ÒѾÓÐ4È˻ظ´
ÕÐÊÕµ÷¼Á˶ʿ
ÒѾÓÐ10È˻ظ´
271²ÄÁϹ¤³ÌÇóµ÷¼Á
ÒѾÓÐ6È˻ظ´
²ÄÁÏר˶274Ò»Ö¾Ô¸ÉÂÎ÷ʦ·¶´óѧÇóµ÷¼Á
ÒѾÓÐ8È˻ظ´
Ò»Ö¾Ô¸Î人Àí¹¤²ÄÁϹ¤³Ìר˶µ÷¼Á
ÒѾÓÐ4È˻ظ´
085601²ÄÁϹ¤³Ìר˶Çóµ÷¼Á
ÒѾÓÐ10È˻ظ´
321Çóµ÷¼Á
ÒѾÓÐ8È˻ظ´

С¿ÉÓÐÀñÁË
ÖÁ×ðľ³æ (ÖøÃûдÊÖ)
- Ó¦Öú: 4 (Ó×¶ùÔ°)
- ½ð±Ò: 18702.7
- É¢½ð: 101
- ºì»¨: 1
- Ìû×Ó: 2545
- ÔÚÏß: 215.6Сʱ
- ³æºÅ: 751694
- ×¢²á: 2009-04-18
- ÐÔ±ð: GG
- רҵ: ¼ÆËã»ú¿ÆÑ§
¡ï
liangduoqiang(½ð±Ò+1,VIP+0):3 5-23 17:09
liangduoqiang(½ð±Ò+1,VIP+0):3 5-23 17:09
|
3£©function¹ý³Ì¿ÉÒÔ¶¨ÒåΪ×Ö·ûÐÍÊý¾Ý£¨¹Ì¶¨³¤¶È³ýÍ⣩£¬ÇëÎÊ¡°¹Ì¶¨³¤¶È¡±ÈçºÎ½ç¶¨£¿ why¹Ì¶¨³¤¶È£¿ '// µÃµ½¹Ì¶¨³¤¶È×Ö·û´®µÄº¯Êý Public Function getFixedLenString(dest As String, fixedLen As Integer) If getMixedStringlen(dest) > fixedLen Then getFixedLenString = Left(dest, fixedLen) Else getFixedLenString = dest + String(fixedLen - getMixedStringlen(dest), " " End If End Function '// µÃµ½»ìºÏ×Ö·û´®µÄ³¤¶ÈµÄº¯Êý Public Function getMixedStringlen(strMixed As String) getMixedStringlen = LenB(StrConv(strMixed, vbFromUnicode)) End Function |
2Â¥2009-05-19 06:33:31
sunhw_hit
ľ³æ (ÕýʽдÊÖ)
ÓÀ²»Â䵨µÄ·ÉÄñ
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ¹ó±ö: 0.645
- ½ð±Ò: 1225.1
- É¢½ð: 50
- ºì»¨: 2
- Ìû×Ó: 607
- ÔÚÏß: 48.6Сʱ
- ³æºÅ: 435932
- ×¢²á: 2007-08-25
- רҵ: Éùѧ

3Â¥2009-05-19 08:46:23
neobe
ͳæ (ÖøÃûдÊÖ)
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ½ð±Ò: 59.1
- É¢½ð: 100
- ɳ·¢: 1
- Ìû×Ó: 2000
- ÔÚÏß: 21.1Сʱ
- ³æºÅ: 731311
- ×¢²á: 2009-03-25
- ÐÔ±ð: GG
- רҵ: ѧ×Ŷ®µÃ
¡ï ¡ï ¡ï ¡ï ¡ï
liangduoqiang(½ð±Ò+3,VIP+0):Ëùµ£¸º 5-23 17:09
liangduoqiang(½ð±Ò+2,VIP+0):afs 5-24 16:14
liangduoqiang(½ð±Ò+3,VIP+0):Ëùµ£¸º 5-23 17:09
liangduoqiang(½ð±Ò+2,VIP+0):afs 5-24 16:14
|
ÎÒÒѾ²»Ñ§VBºÃ¶àÄ꣬µ±³õµÄÃÎÏ뻹ûʵÏÖ¡£ ¹ØÓڹ̶¨³¤¶È£¬ºÃÏñÖ»Òª¶¨ÒåµÄʱºòas string¾ÍÐÐÁË£¬ºóÃæ²»Òª¼ÓÒ»¸ö¹Ì¶¨µÄ×Ö·ûÊýÏÞÖÆ£¬ÄÄÅÂʵ¼ÊÉϾÍÊǹ̶¨³¤¶È¡£ functionËùʵÏֵŦÄÜȷʵÄÜÒÔsubÀ´ÊµÏÖ£¬µ«ÊÇfunctionµÄ´æÔÚ¸üÓÐÀûÓÚ¹¦ÄÜÄ£¿éµÄÒÆÖ²£¬ËüÊÇÒ»¸ö¿ò¼Ü¡£ÌÔÌÓë·ñ£¬²»¸ÒÆÀÂÛ¡£ ¹ý³ÌµÝ¹éµ÷ÓÃÖУ¬×îÖØÒªµÄÊÇÕÒ³öÖÕÖµ¼ÆËãµÄÌõ¼þºÍÒÀ´ÎÁ½´Î½á¹ûÖ®¼äµÄ¹ØÏµ¡£ Õâ¸öºÜͬÒ⣬Õâ¸ö¡°ÕÒ³ö¡±µÄ¹ý³Ì£¬ÆäʵÊÇÒ»´ÎÒ»´ÎÅжÏÑ¡Ôñ£¬Ö±ÖÁ×îÖÕÅöµ½¿ÉÒÔÖ±½Ó¼ÆËã³öÀ´¾ßÌåÖµµÄÌõ¼þ£¬È»ºóÒÀ´ÎÓÐÐòµÄ·µ»Ø¡£ |

4Â¥2009-05-19 09:21:40
neobe
ͳæ (ÖøÃûдÊÖ)
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ½ð±Ò: 59.1
- É¢½ð: 100
- ɳ·¢: 1
- Ìû×Ó: 2000
- ÔÚÏß: 21.1Сʱ
- ³æºÅ: 731311
- ×¢²á: 2009-03-25
- ÐÔ±ð: GG
- רҵ: ѧ×Ŷ®µÃ

5Â¥2009-05-19 09:25:14













»Ø¸´´ËÂ¥