Microsoft® Visual Basic® Scripting Edition
Sub ³¯­z¦¡
 µ{¦¡»y¨¥°Ñ¦Ò 
  | Version 1 

½Ð°Ñ¾\


»¡©ú
«Å§i Sub µ{§Çªº¦WºÙ¡B¤Þ¼Æ©M¨ä¤¤ªºµ{¦¡½X¡C
»yªk
[Public | Private] Sub name [(arglist)]
    [statements]
    [Exit Sub]
    [statements]
End Sub

Sub ³¯­z¦¡ªº»yªk¨ã¦³¥H¤U´X­Ó³¡¤À¡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
arglist ¤Þ¼Æ¦³¤U¦C»yªk©M³¡¤À¡G

[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

¥u­n¨Ï¥Îµ{§Ç¦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

ª`·N  Sub µ{§Ç¥i»¼°j¡A¤]´N¬O¥¦­Ì¥i¥H©I¥s¦Û¤v¡CµM¦Ó¡A»¼°j¥i¯à·|³y¦¨°ïÅ|·¸¦ì¡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  µ{§Ç¥i¨Ï¥Î¤£¬O¦b¸Óµ{§ÇùØ©ú½T«Å§iªºÅܼơA¦ý¬O­Y¦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