Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » VBA for Access

Модерирует : ShIvADeSt

ShIvADeSt (14-09-2011 00:58): Все обсуждение тут http://forum.ru-board.com/topic.cgi?forum=33&topic=0357&start=1180  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25

   

jek1976



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
http://databases.about.com/od/tutorials/ss/forms_4.htm  
http://databases.about.com/od/tutorials/ss/forms.htm  

Там почти ничего нет: несколько строк текста и все!
 
Добавлено:
Сейчас сделал новую чистую форму, накидал в нее текстбоксов, комбобоксов и надписей. Проверил нужное мне событие Change - вроде бы все нормально.
 
Вопрос теперь в другом: для комбобокса необходимо сформировать список значений и занести этот список в него. Сами значения списка - это одно из полей записей в определенной таблице. Как вытащить их из таблицы?

Всего записей: 1057 | Зарегистр. 15-04-2005 | Отправлено: 21:08 11-07-2009
dneprcomp



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
jek1976

Цитата:
Там почти ничего нет: несколько строк текста и все!  

А боьше и не надо. Там просто расписано за что отвечает каждый пункт меню
Цитата:
Вопрос теперь в другом: для комбобокса необходимо сформировать список значений и занести этот список в него.
Уже давал  
http://www.everythingaccess.com/tutorials.asp?ID=VBA-Traps%3A-Working-with-Recordsets
 
Или если значений не много, занести нарямую в коде

Всего записей: 3923 | Зарегистр. 31-03-2002 | Отправлено: 03:56 12-07-2009 | Исправлено: dneprcomp, 21:30 12-07-2009
jek1976



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
dneprcomp
Буду делать привычным мне способом - на VB. Через ADO.
Перехожу на ветку Visual Basic 6 (раздел "Прикладное программирование"). Если ты не против, продолжим общение там .

Всего записей: 1057 | Зарегистр. 15-04-2005 | Отправлено: 02:40 19-07-2009 | Исправлено: jek1976, 02:42 19-07-2009
Elena3785

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Кто подскажет вот в таком вопросе. Есть форма, в которой есть список и поле. Я выбираю в списке нужную строчку и ввожу в поле число и нажимаю кнопку Ввести. Вопрос вот в чем, если я выбираю в списке другую строчку, то в поле остается прежнее число. Как прописать код, чтобы в этом поле снова было пусто? Заранее спасибо.

Всего записей: 24 | Зарегистр. 11-05-2008 | Отправлено: 18:11 28-11-2009
dneprcomp



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Elena3785
Попробуй на кнопку после своего кода добавить
Me.[имя поля] = ""
или этот же код добавить на ListBox OnClick Event  
Место добавления кода зависит от нужной логики работы

Всего записей: 3923 | Зарегистр. 31-03-2002 | Отправлено: 20:10 28-11-2009 | Исправлено: dneprcomp, 20:13 28-11-2009
Vilerius

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите, пожалуйста, как организовать такую процедуру для формы по добавлению записей в таблицу, которая после нажатия кнопки будет выводить:
1) "В какую таблицу желаете добавить запись? "
2) "Введите значение для поля Поле_1"   (где название поля будет считываться из таблицы, имя которой мы задали раньше + можно будет выбрать тип данных для введенного значения)
3) "Введите значение для поля Поле_2" (где название поля будет считываться из таблицы, имя которой мы задали раньше + можно будет выбрать тип данных для введенного значения)  
 и т.д, пока не закончатся поля в таблице
 
ПОЖАЛУЙСТА, третью ночь не сплю(( если что-то не понятно спрашиваю - растолкуйте - перефразирую

Всего записей: 29 | Зарегистр. 15-09-2009 | Отправлено: 03:09 16-12-2009
Panteryl4ik

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
здравствуйте!!!!!!
помогите пожалуйста...у меня вот такая проблемма!!!!
я недавно начла занматься БД....,по работе понадоблось...сделала вроде всё что нужно...
а вот начальник сказал что нужно ещё сделать процедуру на VBA для анализа верности запроса.
есть БД...по программному обеспеч..в ней 3 запроса...ПО/техподдержка,ПО/отдел,ПО/поставыщик...
при запуске запроса вылетает окошко..где просят ввсести..к примеру наименование ПО..после нажатия ОК.вылетает форма на таблицу,где написаны результаты запроса...
если ж ввожить данные которых не существукет,изначально в самой БД,т.е. они не были в неё внесены,то вылетает пустая таблица...
а необходимо что б вылетало сообщение об ошибке,или не предпрнималось никаких действий...
помогите пожалуйста....очень нужно...не пойму как это сделать...

Всего записей: 4 | Зарегистр. 16-12-2009 | Отправлено: 10:42 17-12-2009
dneprcomp



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Panteryl4ik
Попробуй в той же процедуре на обработку нажатия OK поставить проверку количества рекордов в результате. Что-то вида:
IF Me.Recordset.RecordCount>0 then
   вылетает форма на таблицу
ELSE
   MsgBox "Ничего нет"
End If
 
Что бы сказать точнее, надо видеть каким образом, с каким именем и где создается рекордсет.

Всего записей: 3923 | Зарегистр. 31-03-2002 | Отправлено: 00:58 18-12-2009 | Исправлено: dneprcomp, 01:00 18-12-2009
Panteryl4ik

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
спасибо огромное...т.е. мне нужно на саму форму запроса написать процедуру,кот-ую вы предложили...на событие нажатие кнопки?!
просто это окошко для ввода данных при выполнении запроса автоматич выводтся...этого я не прописывала...

Всего записей: 4 | Зарегистр. 16-12-2009 | Отправлено: 10:26 18-12-2009
djoninet

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
помогите пожалуйста!
для заполнения таблицы создается форма с текстовым полем, и при нажатие на кнопку данные из поля должны появиться в конкретном столбце в таблице.
DAO

Всего записей: 6 | Зарегистр. 18-12-2009 | Отправлено: 19:38 18-12-2009
dneprcomp



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Panteryl4ik
Без кода ничего сказать невозможно. Такой if можно применить на вызов разных событий. Все зависит от логики работы существующего кода.  
Скорее всего на обработку нажатия кнопки OK.

Всего записей: 3923 | Зарегистр. 31-03-2002 | Отправлено: 20:12 18-12-2009
djoninet

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
вот именно код я и не знаю как писать. у меня есть таблица выставки, и форма добавить запись с несколькими полями для ввода, и кнопка сохранить. вот  я и не знаю что надо прописать так чтобы при нажатии на кнопку данные из этих полей добавились в нужные столбцы в таблице(
 
Добавлено:
блин я сначала не увидела думала что вы мне ответили(

Всего записей: 6 | Зарегистр. 18-12-2009 | Отправлено: 20:16 18-12-2009
dneprcomp



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
djoninet
Можно совсем без кода. Просто привязать тeкстбоксы к полям. Тогда любое изменение тут же записывается в базу.  
Только это "неприлично"
 
Посмотри
http://bytes.com/topic/access/answers/458412-add-update-records-vba
http://functionx.com/vbaccess2003/howto/addrecord.htm
http://www.access-programmers.co.uk/forums/archive/index.php/t-33166.html

Всего записей: 3923 | Зарегистр. 31-03-2002 | Отправлено: 22:32 18-12-2009
djoninet

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
не там препод зверь, ей обязательно через код прописать надо........

Всего записей: 6 | Зарегистр. 18-12-2009 | Отправлено: 23:06 18-12-2009
dneprcomp



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
djoninet
Так смотри ссылки

Всего записей: 3923 | Зарегистр. 31-03-2002 | Отправлено: 00:44 19-12-2009
djoninet

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
с этим еще куда не шло...... а как прописать, чтоб пр и нажатие на кнопку удалить запись, у удалялась строчка в таблице?

Всего записей: 6 | Зарегистр. 18-12-2009 | Отправлено: 20:37 19-12-2009
dneprcomp



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
djoninet
http://www.google.com/search?hl=en&source=hp&q=access+delete+record&aq=4&oq=access+delete&aqi=g10

Всего записей: 3923 | Зарегистр. 31-03-2002 | Отправлено: 22:49 19-12-2009
djoninet

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ох хреновый из меня делатель бд...  
 
Добавлено:
 
Private Sub Кнопка8_Click()
Dim db As Database
Dim rs As Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("Выставки")
rs.AddNew
 rs("НазваниеВыставки") = Me![НазваниеВыставки]
 rs.Update
rs.Close
End Sub

Всего записей: 6 | Зарегистр. 18-12-2009 | Отправлено: 23:11 19-12-2009
dneprcomp



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
djoninet
И...? Зачем здесь этот код?
Если работает - поздравляю. Если нет - где возникающие errors?

Всего записей: 3923 | Зарегистр. 31-03-2002 | Отправлено: 00:03 20-12-2009
djoninet

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ну я пыталась чтоб из поля "НазываниеВыставки " в форме данные добавились в одноименное поле в табл........... ииииии это не работает, ему не нравиться обновление Update

Всего записей: 6 | Зарегистр. 18-12-2009 | Отправлено: 12:34 20-12-2009
   

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » VBA for Access
ShIvADeSt (14-09-2011 00:58): Все обсуждение тут http://forum.ru-board.com/topic.cgi?forum=33&topic=0357&start=1180


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2025

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru