|
|
|
разбить поле
|
|||
|---|---|---|---|
|
#18+
Есть поле ФИО. Надо сделать три поля: Фамилия, Имя, Отчество. Как разбить существущее поле с сохранением данных. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.03.2003, 15:33 |
|
||
|
разбить поле
|
|||
|---|---|---|---|
Модератор форума
|
|||
|
#18+
Dim i1 As Integer, i2 As Integer i1 = Instr(FIO, " ") i2 = Instr(i1 + 1, FIO, " ") Fam = Left(FIO, i1 - 1) Imya = Mid(FIO, i1 + 1, i2 - i1 - 1) Otch = Mid(FIO, i2 + 1) Только надо предусмотреть случай, когда пробелов больше или меньше, чем 2, в том числе могут быть цепочки пробелов, идущих подряд. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.03.2003, 15:45 |
|
||
|
|
start [/forum/topic.php?fid=45&fpage=1819&tid=1682161]: |
0ms |
get settings: |
9ms |
get forum list: |
16ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
30ms |
get topic data: |
10ms |
get forum data: |
3ms |
get page messages: |
48ms |
get tp. blocked users: |
2ms |
| others: | 235ms |
| total: | 361ms |
| 0 / 0 |
