[hassanalhawy]

احتمال واحد للتفرع
Dim a As Integer = 5
Select Case a
Case Is >= 5
MsgBox("Ok")
End Select