на бейсике это примерно так:
- Код: Выделить всё
Select Case strValue
Case "Val1"
'вызов процедуры1
Case "Val1"
'вызов процедуры2
End Select
Модератор: Ramzes
Select Case strValue
Case "Val1"
'вызов процедуры1
Case "Val1"
'вызов процедуры2
End Select
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2