我在想是否可以选择函数或子的String(或Integer,而不是Boolean)输入参数。
假设我有一个Sub:
Public Sub PageSetup(Byval Orientation as String)
'Some code here
End Sub
当我使用此子时,我想从项目列表中选择方向:纵向,横向。就像布尔提供选择True或False一样。
我知道我可以在这个例子中使用布尔值,但我还有其他想法,我不会只有两个选项。
也许使用Enum或简单的数组,我不知道,我不能用这些来做。
提前致谢。
答案 0 :(得分:2)
枚举就是为此而设计的。
请参阅MSDN examples:
Public Class Egg
Enum EggSizeEnum
Jumbo
ExtraLarge
Large
Medium
Small
End Enum
End Class
Public Sub Scramble(ByVal size As Egg.EggSizeEnum)
' Process for the three largest sizes.
' Throw an exception for any other size.
Select Case size
Case Egg.EggSizeEnum.Jumbo
' Process.
Case Egg.EggSizeEnum.ExtraLarge
' Process.
Case Egg.EggSizeEnum.Large
' Process.
Case Else
Throw New ApplicationException("size is invalid: " & size.ToString)
End Select
End Sub