Microsoft® Visual Basic® Scripting Edition Sub ³¯z¦¡ |
µ{¦¡»y¨¥°Ñ¦Ò | Version 1 |
«Å§i Sub µ{§Çªº¦WºÙ¡B¤Þ¼Æ©M¨ä¤¤ªºµ{¦¡½X¡C
[Public | Private] Sub name [(arglist)]
[statements]
[Exit Sub]
[statements]
End SubSub ³¯z¦¡ªº»yªk¨ã¦³¥H¤U´XÓ³¡¤À¡G
arglist ¤Þ¼Æ¦³¤U¦C»yªk©M³¡¤À¡G
²Õ¦¨³¡¤À »¡©ú Public ªí¥Ü¥ô¦ó¼Ò²Õùتº©Ò¦³¨ä¥¦µ{§Ç³£¥i©I¥s¦¹ Sub µ{§Ç¡C Private ªí¥Ü¦¹ Sub µ{§Ç¥u¦b«Å§i¥¦¤§¼Ò²Õùتºµ{§Ç©Ò¨Ï¥Î¡C name ¦¹ Sub; ªº¦WºÙ¡A¿í´`¼Ð·ÇÅܼƩR¦W³W®æ¡C arglist ªí¥Ü©I¥s¦¹ Sub µ{§Ç®É©Ò¶Ç°e¤Þ¼ÆªºÅܼƲM³æ¡CÅܼƥH³r¸¹¹j¶}¡C statements ¥ô¦ó Sub µ{§Çn°õ¦æªº³¯z¦¡¸s²Õ¡C [ByVal | ByVal] varname[( )]
²Õ¦¨³¡¤À »¡©ú ByVal ªí¥Ü¥H¶ÇȪº¤è¦¡¶Ç»¼¤Þ¼Æ¡C ByRef ªí¥Ü¥H¶Ç§}ªº¤è¦¡¶Ç»¼¤Þ¼Æ¡C varname ¥Nªí¤Þ¼ÆªºÅܼƦWºÙ¡A¿í´`¼Ð·ÇÅܼƩR¦W³W®æ¡C
Sub µ{§ÇYµL©ú½T¦a«ü©w¬° Public ©Î Private¡A«h¹w³]¬° Public¡C³oªí¥Ü³o¨Ç Sub ¥i³Q±zµ{¦¡½X¤¤¨ä¥Lªºµ{§Ç©Ò¨Ï¥Î¡C¦ý¦bµ{§Ç¶¡©I¥s Sub¡A¨ä¤¤ªº°Ï°ìÅܼÆȱN¤£³Q«O¯d¡C©Ò¦³ªº¥i°õ¦æµ{¦¡½X³£¥²¶·¦bµ{§Ç¤¤¡A¥B¤£¥i¥H¦b Function¡BSub µ{§ÇùØ©w¸q¨ä¥¦ªº Sub µ{§Ç¡C
Exit Sub ³¯z¦¡·|¨Ï Sub µ{§Ç¥ß§Y°±¤î¡Aµ{¦¡·|±q©I¥s¸Ó Sub µ{§Çªº¤U¤@¦æ³¯z¦¡Ä~Äò°õ¦æ¡CExit Sub ³¯z¦¡¥i¦b Sub µ{§Ç¥ô¦ó¦ì¸m¥X²{¡A¥B¤£¦¸¼Æ¡C
¦p¦P Function µ{§Ç¤@¼Ë¡ASub µ{§Ç¬O¿W¥ßªºµ{§Ç¡A¥i¥H±µ¨ü¤Þ¼Æ¡A°õ¦æ¤@¦ê³¯z¦¡¡A¨Ã¥B§ïÅܤ޼ƪºÈ¡CµM¦Ó¡A¤£¹³ Function µ{§Ç·|¶Ç¦^È¡ASub µ{§ÇµLªk¦b¹Bºâ¦¡ùبϥΡC
¥un¨Ï¥Îµ{§Ç¦WºÙ«á¡A±µµÛ¥H¬A¸¹¬A°_¨Óªº¤Þ¼Æ¦C¡A´N¥i¥H©I¥s Sub µ{§Ç¡C½Ð°Ñ¦Ò Call ³¯z¦¡¥H±oª¾Ãö©ó¦p¦ó©I¥s Sub µ{§Çªº¯S©w¸ê°T¡C
¦b Sub µ{§Ç¤¤¨Ï¥ÎªºÅܼƦ³¨âÃþ¡G¨º¨Ç¦bµ{§Ç¤¤©ú½T«Å§iªº¡A¥H¤Î¤£¬O¦¹Ãþªº¡C¦bµ{§Ç¤¤©ú½T¦a«Å§iªºÅܼơ]¨Ï¥Î Dim ©Î¦PÃþ¦r¡^¡A¥²¬°°Ï°ìÅܼơCµ{§Ç¤¤¦³¨Ï¥Î¨ì¡A¦ý¥¼¦bµ{§Ç¤¤«Å§iªºÅܼƤ]¬O°Ï°ìªº¡A°£«D¦¹ÅܼƤw¦bµ{§Ç¥~§ó°ª¼h¦¸¤¤³Q«Å§i¡C
ª`·N Sub µ{§Ç¥i»¼°j¡A¤]´N¬O¥¦Ì¥i¥H©I¥s¦Û¤v¡CµM¦Ó¡A»¼°j¥i¯à·|³y¦¨°ïÅ|·¸¦ì¡C
ª`·N µ{§Ç¥i¨Ï¥Î¤£¬O¦b¸Óµ{§ÇùØ©ú½T«Å§iªºÅܼơA¦ý¬OY¦bScript ¼h¦¸©w¸q¤F¬Û¦Pªº¦WºÙ¡A´N·|µo¥Í¦WºÙ¤Wªº½Ä¬ð¡C¦pªGµ{§ÇùؤޥΤF¥¼«Å§iªºÅܼơA¦Ó¦¹Åܼƪº¦WºÙ©M¨ä¥¦µ{§Ç¡B±`¼Æ©ÎÅܼƪº¦WºÙ¬Û¦P¡A«h·|»{©wµ{§Ç¬O¤Þ¥ÎScript ¼h¦¸ªº¦WºÙ¡C©Ò¥H¡A½Ð©ú½T¦a«Å§iÅܼƥHÁקK¦¹ºØ½Ä¬ð¡C¥i¨Ï¥Î Option Explicit ³¯z¦¡¨Ó±j¢Åܼƪº«Å§i¡C