请问aardio 有没有VB 的类似如下选择判断函数,谢谢
Switch 函数示例
本示例使用 Switch 函数返回和城市名称匹配的语言名称。
Function MatchUp (CityName As String)
Matchup = Switch(CityName = "London", "English", CityName _
= "Rome", "Italian", CityName = "Paris", "French")
End Function
IIf 函数示例
本示例使用 IIf 函数来判断 CheckIt 过程之 TestMe 参数的值,如果参数值大于 1000 则传回“Large”;否则传回“小图标”。
Function CheckIt (TestMe As Integer)
CheckIt = IIf(TestMe > 1000, "Large", "Small")
End Function
Choose 函数示例
本示例使用 Choose 函数来显示一个名称,该名称对应於用 Ind 参数传递到过程之中的索引。
Function GetChoice(Ind As Integer)
GetChoice = Choose(Ind, "Speedy", "United", "Federal")
End Function