Сохранение данных, отображенных в подчиненной форме

@Байдан · Регистрация: 04.05.2010

Author24 — интернет-сервис помощи студентам

Приветствие! Пожалуйста, помогите решить следующую проблему.
В главную форму FrmMain вставлена подчиненная форма FrmPod с отобранными данными. Необходимо по нажатию кнопки организовать цикл для отбора всех данных, отображаемых в поле Pole1 подчиненной формы. Если следовать примеру на приведенной картинке, в результате должен получиться массив: Mas(1, 3, 6, 7, 5, 76876, 876786)
Очень признателен за ответ.

@Вячеслав Я · 27.06.2014, 18:03

Байдан, что означают цифры в ПОЛЕ1? это уникальный код и типом СЧЕТЧИК или что-то еще. если это числа кода, то должны быть еще дополнительные поля, в которых есть общие данные. именно по этим данным можно и вывести ваши данные. поясните мое сообщение.

@Agapov_stas · 27.06.2014, 22:09

Visual Basic

Dim rs As Object, s As String
Set rs = Me.FrmPod.Form.RecordsetClone
 
s = ""
rs.MoveFirst
Do While Not rs.EOF
   s = s & "," & rs!Pole1
rs.MoveNext
Loop
Set rs = Nothing
 
MsgBox Mid(s, 2)

@Teslenko_EA · 27.06.2014, 23:57

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

Visual Basic

Dim v
v = Forms("FrmPod").RecordSource
v = Replace(v, ";", "")
v = "SELECT Pole1 FROM (" + v + ")"
v = CurrentProject.Connection.Execute(v).GetRows

Для получения одномерного массива, можно воспользоваться следующей конструкцией:

Visual Basic

Dim v
v = Forms("FrmPod").RecordSource
v = Replace(v, ";", "")
v = "SELECT Pole1 FROM (" + v + ")"
v = CurrentProject.Connection.Execute(v).GetString(, , , " ")
v = Split(v, " ")

Евгений.

@Байдан 0 / 0 / 0 Регистрация: 04.05.2010 Сообщений: 7
		1
	Сохранение данных, отображенных в подчиненной форме 27.06.2014, 13:00. Показов 623. Ответов 3 Метки нет (Все метки) Приветствие! Пожалуйста, помогите решить следующую проблему. В главную форму FrmMain вставлена подчиненная форма FrmPod с отобранными данными. Необходимо по нажатию кнопки организовать цикл для отбора всех данных, отображаемых в поле Pole1 подчиненной формы. Если следовать примеру на приведенной картинке, в результате должен получиться массив: Mas(1, 3, 6, 7, 5, 76876, 876786) Очень признателен за ответ. Миниатюры 0

@Вячеслав Я 2833 / 1375 / 215 Регистрация: 13.05.2011 Сообщений: 4,217
	27.06.2014, 18:03	2
	Байдан, что означают цифры в ПОЛЕ1? это уникальный код и типом СЧЕТЧИК или что-то еще. если это числа кода, то должны быть еще дополнительные поля, в которых есть общие данные. именно по этим данным можно и вывести ваши данные. поясните мое сообщение. 0

	27.06.2014, 23:57

Опции темы