Не могу найти подсчёт строк с поле формы. / Microsoft Access

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не могу найти подсчёт строк с поле формы.

10 сообщений из 10, страница 1 из 1

Не могу найти подсчёт строк с поле формы.

#39613153

Wawan2005

Гость

И снова здравствуйте, у меня новая проблема, не могу посчитать строки с поле формы, не нашёл ни одного варианта.

А теперь по существу, необходимо знать сколько строк в поле, для последующего смещения других полей (выше или ниже) чтобы не было пробелов в АКТе

...

Рейтинг:

0 / 0

12.03.2018, 01:22

| Ответить | Цитировать | Написать

Не могу найти подсчёт строк с поле формы.

#39613200

guest_rusimport

Гость

Wawan2005,
http://www.sql.ru/forum/1021031-1/kolichestvo-strok-v-tekstbokse

...

Рейтинг:

0 / 0

12.03.2018, 08:46

| Ответить | Цитировать | Написать

Не могу найти подсчёт строк с поле формы.

#39613294

sdku

Участник

Откуда: Краснодар

Сообщения: 7 762

Рейтинг: 0 / 0

А почему не оформить АКТ в виде отчета и задать свойству расширение "ДА" полю

...

Рейтинг:

0 / 0

12.03.2018, 11:33

| Ответить | Цитировать | Написать

Не могу найти подсчёт строк с поле формы.

#39613343

ПЕНСИОНЕРКА

Участник

Откуда: Владимирская обл

Сообщения: 4 809

Рейтинг: 0 / 0

Wawan2005чтобы не было пробелов в АКТе
чаще всего акты/договоры/.... формируют, выводя информацию из аксесс/ексель в закладки WORD

...

Рейтинг:

0 / 0

12.03.2018, 12:25

| Ответить | Цитировать | Написать

Не могу найти подсчёт строк с поле формы.

#39613549

Wawan2005

Гость

guest_rusimport,

Не не вариант, я так-то путаюсь, а скатим кодом, для одного поля, я вообще забуду с чего начинал и что хотел.
Может кто знает вариант по проще ну типа оператора Len для подсчёта символов, мот можно считать также и строки.

...

Рейтинг:

0 / 0

12.03.2018, 15:51

| Ответить | Цитировать | Написать

Не могу найти подсчёт строк с поле формы.

#39613630

guest_rusimport

Гость

Wawan2005guest_rusimport,

Не не вариант, я так-то путаюсь, а скатим кодом, для одного поля, я вообще забуду с чего начинал и что хотел.
Может кто знает вариант по проще ну типа оператора Len для подсчёта символов, мот можно считать также и строки.
Ты это то 15405577 смотрел? Куда уж проще?

...

Рейтинг:

0 / 0

12.03.2018, 16:54

| Ответить | Цитировать | Написать

Не могу найти подсчёт строк с поле формы.

#39613665

Wawan2005

Гость

guest_rusimport,

Код: sql

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.

Private Sub Кнопка18_Click()
Dim pos As Integer
Dim rows As Long
Me.Поле0.SetFocus

rows = 0
pos = Me.Поле0.SelStart
1:

SendKeys "{DOWN}"
DoEvents
If Me.Поле0.SelStart = pos Then    '-------->>>>>>> Ругается на эту строчку не проходит нажатие кнопки (Акцесс 2007)'
  MsgBox "Количество строк - " & (rows + 1)
  Exit Sub
Else
  rows = rows + 1
  pos = Me.Поле0.SelStart
End If

SendKeys "{END}"
DoEvents
If Me.Поле0.SelStart <> pos Then
  pos = Me.Поле0.SelStart
End If
GoTo 1

End Sub

...

Рейтинг:

0 / 0

12.03.2018, 17:35

| Ответить | Цитировать | Написать

Не могу найти подсчёт строк с поле формы.

#39613757

guest_rusimport

Гость

Wawan2005guest_rusimport,

Код: sql

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.

Private Sub Кнопка18_Click()
Dim pos As Integer
Dim rows As Long
Me.Поле0.SetFocus

rows = 0
pos = Me.Поле0.SelStart
1:

SendKeys "{DOWN}"
DoEvents
If Me.Поле0.SelStart = pos Then    '-------->>>>>>> Ругается на эту строчку не проходит нажатие кнопки (Акцесс 2007)'
  MsgBox "Количество строк - " & (rows + 1)
  Exit Sub
Else
  rows = rows + 1
  pos = Me.Поле0.SelStart
End If

SendKeys "{END}"
DoEvents
If Me.Поле0.SelStart <> pos Then
  pos = Me.Поле0.SelStart
End If
GoTo 1

End Sub

Ты этот пост то читал?
цитата - "Только , если не будет работать , то надо, чтобы в Параметрах акса на вкладке Клавиатура стоял переход в начало поля при входе в поле"

...

Рейтинг:

0 / 0

12.03.2018, 20:07

| Ответить | Цитировать | Написать

Не могу найти подсчёт строк с поле формы.

#39613858

Wawan2005

Гость

guest_rusimport,

Спасибо, я вот это использовал

Код: plsql

Me.Поле0.SelStart = 0

так мне кажется будет правильнее. И вот это внёс, как указано.

Код: sql

IF Len(Me.Поле0) = 0 Then MsgBox "Количество строк - 0" : Exit Sub

...

Рейтинг:

0 / 0

13.03.2018, 02:49

| Ответить | Цитировать | Написать

Не могу найти подсчёт строк с поле формы.

#39615476

Wawan2005

Гость

guest_rusimport,

Не не работает, когда в тело моей базы втыкаю всё как отрубает.

...

Рейтинг:

0 / 0

15.03.2018, 15:31

| Ответить | Цитировать | Написать

10 сообщений из 10, страница 1 из 1

Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не могу найти подсчёт строк с поле формы.

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=45&gotonew=1&tid=1611600]:	0ms
get settings:	10ms
get forum list:	14ms
check forum access:	4ms
check topic access:	4ms
track hit:	55ms
get topic data:	11ms
get first new msg:	8ms
get forum data:	3ms
get page messages:	53ms
get tp. blocked users:	1ms
others:	17ms

total:	180ms