Mega Code Archive

 

Categories / VisualBasic Script / Language Basics

 

Default value parameters

Public Function Power (intNumber As Integer, Optional intPower As Variant) As Long     If IsMissing(intPower) Then         Power = intNumber ^ 2     Else         Power = intNumber ^ intPower     End If End Sub Public Function Power (intNumber As Integer, Optional intPower As Integer = 2) As Long    Power = intNumber ^ intPower End Sub