ник: dobus
Привет :)
Подскажите пожалуста, например имеются 2 таблицы, первая с информацией о жильцах, вторая о помещениях которые они занимают. Создаем форму, на основе таблицы о жильцах...на ней делаем Listbox и заполняем его ФИО жильцов, добавляем на эту форму подформу помещений. Как сделать чтобы при двойном клике на ФИО жильца в списке по ней выводилась информация как в основной форме, так и в подформе?
Пробывал нечто подобное ниже, не получилось 
Private Sub lstФИО_DblClick(Cancel As Integer)
Dim strSQL As String
Dim str1SQL As String
strSQL = "SELECT * FROM Жильцы WHERE КодЖильца= " & lstФИО.Column(0)
Forms!Жильцы.RecordSource = strSQL
str1SQL = "SELECT * FROM Помещения WHERE Жилец = " & lstФИО.Column(1)
Forms!Жильцы.Помещения.Form.RecordSource = str1SQL
End Sub