Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: ireus
Есть 2 модуля класса:

Option Compare Database
Option Explicit
Public gvVarProduct As Integer

Private Sub Поле20_DblClick(Cancel As Integer)
gvVarProduct = 0
DoCmd.OpenForm "фТовар", , , , , acDialog
If gvVarProduct = 0 Then Exit Sub
Поле20 = gvVarProduct
Me.Поле20.Requery
End Sub
и
Option Compare Database
Option Explicit
Public gvVarProduct As Integer

Private Sub ИД_DblClick(Cancel As Integer)
gvVarProduct = Me.ИД
DoCmd.Close acForm, Me.Name
End Sub

Как можно убедиться, что переменная gvVarProduct принимает значения, а не остаётся пустой? Дело в том, что по дабл клику в поле 20 (это поле ИД_Товары таблицы Заказ, связано с полем ИД таблицы Товары) открывается форма Товары в режиме диалога, по дабл клику на её ИД (ID) она закрывается., но значение в поле 20 не появляется. Внесение значения вручную происходит нормально, как и удаление. В чём может быть дело, вернее, как проверить, заносится ли значение в переменную?
Заранее спасибо.


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.