циклы в vba
Доброго времени суток. Господа программисты помогите пожалуйста.
у меня бд в access. программа генерации билетов. User вводит нужную инфу в бд,
выполняет ряд действий на форме и на выходе получает набор экзаменационных билетов.
я сейчас столкнулся с 2 проблемами которое не могу решить.
1 таблица bilet. поля id_predm (integer),n_bil (integer), id_bil (counter).
2 таблица voprbil. поля id_bil (integer),id_vopr (integer),n_vopr (integer).
между bilet и voprbil связь 1 ко многим по полю id_bil.
3 таблица vopr_tmp. id(integer),id_vb (counter). В ней уже отобранные вопросы по предмету.
id- сам id вопроса из общей базы
id_vb-номер отобранного вопроса по порядку.
я писал
b=[Forms]![Форма1]![kol_bil]
v=[Forms]![Форма1]![kol_vopr]
For a=1 to b
DoCmd.runsql ("insert into bilet (id_predm) SELECT predm.id FROM predm WHERE [predm].[id]=[Forms]![Форма1]![predm].value")
next a
For n=1 to v
DoCmd.runsql ("insert into voprbil (id_bil) SELECT bilet.id_bil FROM bilet
next n
это 2 не вложеных цикла. они работают, но создают пустые записи.
хотя 2-й цикл не вложен в 1-й, но он работает как вложенный что странно.
вопрос
1. необходимо в таблице bilet создать столько id_bil сколько билетов необходимо Userу, а в таблицу voprbil необходимо занести в поле id_vopr столько id из таблицы vopr_tmp столько вопросов необходимо. при этом 1 билету должно соответствовать определённое к-во вопросов.
как это сделать ?
2. счетчик а и n соответственно а - № билета, n- № вопроса.
как сделать чтобы а и n вставлялись в соответствующие столбцы соответствующих таблиц
3. как вставить id из таблицы vopr_tmp в таблицу voprbil в столбец id_vopr.
у меня бд в access. программа генерации билетов. User вводит нужную инфу в бд,
выполняет ряд действий на форме и на выходе получает набор экзаменационных билетов.
я сейчас столкнулся с 2 проблемами которое не могу решить.
1 таблица bilet. поля id_predm (integer),n_bil (integer), id_bil (counter).
2 таблица voprbil. поля id_bil (integer),id_vopr (integer),n_vopr (integer).
между bilet и voprbil связь 1 ко многим по полю id_bil.
3 таблица vopr_tmp. id(integer),id_vb (counter). В ней уже отобранные вопросы по предмету.
id- сам id вопроса из общей базы
id_vb-номер отобранного вопроса по порядку.
я писал
b=[Forms]![Форма1]![kol_bil]
v=[Forms]![Форма1]![kol_vopr]
For a=1 to b
DoCmd.runsql ("insert into bilet (id_predm) SELECT predm.id FROM predm WHERE [predm].[id]=[Forms]![Форма1]![predm].value")
next a
For n=1 to v
DoCmd.runsql ("insert into voprbil (id_bil) SELECT bilet.id_bil FROM bilet
next n
это 2 не вложеных цикла. они работают, но создают пустые записи.
хотя 2-й цикл не вложен в 1-й, но он работает как вложенный что странно.
вопрос
1. необходимо в таблице bilet создать столько id_bil сколько билетов необходимо Userу, а в таблицу voprbil необходимо занести в поле id_vopr столько id из таблицы vopr_tmp столько вопросов необходимо. при этом 1 билету должно соответствовать определённое к-во вопросов.
как это сделать ?
2. счетчик а и n соответственно а - № билета, n- № вопроса.
как сделать чтобы а и n вставлялись в соответствующие столбцы соответствующих таблиц
3. как вставить id из таблицы vopr_tmp в таблицу voprbil в столбец id_vopr.