| |
|
|
| | Помогите пожалуйста!
есть главная форма в ней подчиненная
при нажатии на кнопку в главной форме открываются 2 формы в зависимости от содержания поля Зачтено, расположенного в подчиненной форме....в поле зачтено устанавливаю курсор...но выдается MsgBox ....похоже что поле в подчиненной форме программа не видит....
Private Sub Cmd1_Click()
Dim stDocName As String
Dim stLinkCriteria As String
Form_ФПК.подчиненная_форма.Зачтено.SetFocus
If Зачтено = "зачтено" Then
stDocName = "Удостоверение"
DoCmd.OpenForm stDocName, , , stLinkCriteria
ElseIf Зачтено = "справка" Then
stDocName = "Справка"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
MsgBox "Поле 'Зачтено'по выбранному слушателю, не заполнено!", 48, "Внимание!"
End If
End Sub | |
| |
| |
| |
|
|
| | А зачем вы устанавливаете фокус?
И синтаксис у вас неверен.
Почему бы просто
If Me.подчиненная_форма.Form.Зачтено = "зачтено" Then
|
Зачем вы используете синтаксис Form_ФПК.подчиненная_форма.Зачтено.SetFocus?
Не используйте Form_Имя Формы для доступа к элементам форрмы.
А для установки фокуса на контрол подчиненной формы, сначала можно установить фокус на контрол подчиненной формы, а потом использовать DoCmd.GotoControl. | |
| |
| |
