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

 

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

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

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

ник: oxigen
Бляха муха выкрутился так.
Создал в базе данных таблицу1. (а как иначе (программеры не смейтесь))
И на событие клика по чекбоксу выставил

Private Sub TreeView0_NodeCheck(ByVal Node As Object)
If Left(Node.Key, 1) = "b" Then
If Node.Checked = True Then
CurrentDb.Execute "INSERT INTO [Таблица1] (КодЭлемента, Текст) values ('" & Node.Key & "', '" & Node.Text & "')"
Else
CurrentDb.Execute "DELETE Таблица1.КодЭлемента FROM Таблица1 WHERE (((Таблица1.КодЭлемента)='" & Node.Key & "'));"
Me.PolCeckboxes = ""
End If
Else
End If
Me.Список21.Requery

В общем список21 нужен для контроля что там в таблице происходит. ВСЕ РАБОТАЕТ!
При закрытии формы нужно будет обнулять таблицу. Или вообще при открытии формы создавать таблу... Не важно.

Сам дошел! По сути все получилось. А как правильно поступать в таких случаях? Программеры? АУ!


Ваше имя:

Пароль:

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

Сообщение:

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

Прикрепить:

 

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