| |
|
|
| | В текстовом поле есть сквозная нумерация...но бывает когда в нумерации есть пробелы. т.е. 4,5,6,9,10
Подскажите как вывести номера которые отсутствуют? т.е. 1,2,3,7,8 | |
| |
| |
| |
|
|
| | можно попробовать написать свою функцию
next - prev <> 1
то пропущено | |
| |
| |
| |
|
|
| | Вот попробуйте из этого что нибудь сварганить своё
Кода то давно делал ....
надо переделать да вроде ока не нужно........
'поиск свободных номеров
Dim F As Integer, S As Integer
F = Me!Поле9' какого номера
S = (Val(Me!Поле9) + Val(Me!Поле11))' по какой номер
'Val(Me!Поле11))' сколько номеров
If MsgBox("Проверяем номера с " & Me!Поле9 & " по " & S, vbQuestion + vbYesNo) = vbNo Then Exit Sub
Поле0 = " "
intM = 0
For intM = F To S
Me!Поле6.SetFocus
Me!Поле6 = intM
Requery
If intM > S Then GoTo b
If DFirst("[NOMER]", tabd, "[NOMER] =" & intM) Then
Else
If intM = F Then Поле0 = intM & ", ": GoTo Bb
Поле0 = Поле0 & intM & ", "
Bb:
Поле0.SetFocus
Requery
End If
Next intM
MsgBox "ПРОВЕРКА ОКОНЧЕНА"
b:
|
| |
| |
| |
| |
|
|
| | Насколько я понял, у автора есть поле со значением
т.е. ему нужно сделать
1,2,3,7,8
Задача сводится к перебору в массиве всех значений поля ( запятые в массив не передаются). После формируется новый массив из пропущенных чисел, и эти данные, опять, же разделяются запятыми, и массив преобразуется в строку, с которой чо-нить потом делается.
По моему, такие задачки решаются на первых курсах при изучении программирования. | |
| |
| |
| |
|
|
| | Решается быстрее запросом:
SELECT str2
FROM tbl2
WHERE str2 Not In (SELECT str1 FROM tbl1);
|
где tbl2 - заготовленная таблица с полным набором номеров. | |
| |
| |
| |
 10 Кб. |
|
| | Ну и как с помощью твоего запроса в поле2 засунуть нехватающие в поле NUM номера из Поле1 Таблицы1? | |
| |
| |
| |
|
|
| | 
Автор:
...В текстовом поле есть сквозная нумерация...
|
Я понял это так, что в поле таблицы ведется нумерация:
запись (ID=1) значение поля = "1"
запись (ID=2) значение поля = "2"
и т.д.
Записи иногда удаляются, и тогда возникают "пробелы" в нумерации.
Этот вариант можно решить запросом.
А если рассматривать твой вариант значений полей типа "1,2,7,8", тогда да, кодом.
Но я так думаю, что это не есть "...сквозная нумерация..." | |
| |
| |
| |
|
|
| | БАЛЯЦЬ БАЛАЦЬ МОИ НОЖКИ БАЛЯЦЬ
Совсем торможу
Есть строка "1,2,3,4,5,6"
Как ее переделать в массив значений 1 2 3 4 5 6?
Под вечер них не соображаю.
А ведь когда то делал  | |
| |
| |
| |
|
|
| | Split
И значения в массиве.
Подробней надо? | |
| |
| |
|
|
| |
|
|
| | Давно пора.
Сегодня-же тяпница.  | |
| |
| |
| |
|
|
| | К концу тяпницы уровень мозговой активности падает почти до нуля, а коэффициент IQ выыще становится отрицательным.
| |
| |
| |
| |
|
|
| | Вот поэтому и придумали выходные. | |
| |
| |
| |
|
|
| | Пока разбирался с ентым массивом, забыл нафига он мну был нужен. А ведь хотел для чего-то всунуть в проект.  | |
| |
| |
|
|
|
|
| |
|
|
| | Передавай ей, чтоб росла большая и не баловная. | |
| |
| |
