Ну блин!!!!
Написал:

Private Sub Form_Current()
Dim B As String, C As Date
C = Forms![Groups]![ID_Group]
B = "SELECT SUM(Sub_Group.Mest_Sub_Group * Types_Nomer.Mest_Type)" _
& " AS Vsego FROM dbo.Sub_Group INNER JOIN dbo.Types_Nomer ON" _
& " dbo.Sub_Group.Type_Sub_Group = dbo.Types_Nomer.ID_Type_Nomer" _
& " WHERE (dbo.Sub_Group.K_Group = '" & Format(C, "yyyymmdd hh:mm:ss") & "')"
Forms![Groups]![SP41].RowSource = B
Forms![Groups]![SP41].Requery
End Sub

Запускаю - работает:)
Через 2-3 раза - перестало:(
Закр-Откр форму - не работает:(((
Что за глюк?:(

Geen

Никто не знает что-ли?:)
Повесил кнопку:

Private Sub Кнопка8_Click()
Dim B As String, C As Date
C = Forms![Groups]![ID_Group]
B = "SELECT SUM(Sub_Group.Mest_Sub_Group * Types_Nomer.Mest_Type)" _
& " AS Vsego FROM dbo.Sub_Group INNER JOIN dbo.Types_Nomer ON" _
& " dbo.Sub_Group.Type_Sub_Group = dbo.Types_Nomer.ID_Type_Nomer" _
& " WHERE (dbo.Sub_Group.K_Group = '" & Format(C, "yyyymmdd hh:mm:ss")& "')"
Forms![Groups]![SP41].RowSource = B
Forms![Groups]![SP41].Requery
End Sub

И что интересно работает только со второго клика
(первый раз - ничего, второй раз - выдает искомое)
не путать с ДблКлик
И что за фигня?:(((

Geen

В обоих случаях - правильный роусорс:(

Geen

в форме "1"
формула 1*2 = 2 (вижу два)
Меняю
в форме "2"
2*2=4
Первый клик:
роусорс - правильный
2*2 = 4 ( в поле вижу 2)
Второй клик
роусорс - правильный
2*2=4 (вижу искомое 4)

Geen

А может быть запись в подчиненной форме не сразу попадает на сервер??? ...

Насчет корня в "С" - не уверен ("С" забито заранее и является просто критерием).
Сделал SetFocus - работает!
Но не совсем так как нужно:(
Если набираю 1 - срабатывает!:)
Если пытаюсь набрать 12 - то берет первое нажатие и сетфокусит и всячески выполняет код :(?????
В итоге вижу 1 вместо 12
Странно...

Geen