|
|
От: | ogion | |
| Дата: | 27.05.06 14:42 | ||
| Оценка: | |||
IB> For intCounter = 0 To 2
IB> Select Case intCounter
IB> Case 0
IB> ...
IB> Case 1
IB> ...
IB> Case 2
IB> ...
IB> End Select
IB> Next intCounter
IB>