Co jsi nasel googlem? Pokud jsi nic nehledal (5 minut), tak muzes cekat na odpoved i 2 dny na forku :)
Mozna by bylo dobre zminit jine moznosti, napriklad
// vyhledani v poli
Dim ShippingMethod() As String = {"Standard Shipping", "Ground EST"}
Dim index As Integer = Array.IndexOf(ShippingMethod, Shipping)
If index < 0 Then
' not found
End If
// porovnani zleva, zprava bys na papir zapsal a < X < b
If (a<X and X<b) // muze se to jevit prehlednejsi nez
If (X>a and X<b)