|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
14.04.2010, 22:31 | #1 |
Регистрация: 28.03.2010
Сообщений: 7
|
Создание теста в VBA с пом-ью пользовательской формы.
Нужна помоща по созданию теста в ВБА(я бы, впринципе и сам разобрался, но на освоение множества материала у меня уйдёт уйма времени, кот. нет( мне бы хотябы получить основу, дальше я сам), а именно:
все сообщения, окна выводятся с помощью пользовательской формы. Данные для тестов (вопросы, варианты ответов, ответы) ведётся на листе эксель(который надо каким то образом скрыть, что бы он не был доступен тому, кто проходит тест ) 1)Выводится окно в котором нужно ввести свою фамилию.В этом же окне происходит выбор теста из списка. И кнопка Далее(которая not enable если не введена фамилия и не выбран номер теста). 2)Вылазит следующее окно формы, в котором присутствует сам тест. Сверху написан номер теста, дальше идут вопросы с 3~4 вариантами ответов(о вопросах и ответах чуть ниже), причём вопросы идут в рандомном порядке, и в таком же порядке идут варианты ответов к ним (что бы не было такого, что бы потом разошлись слухи об ответах на тест, типа "на 3ий вопрос ответ - б"). И кстати, вариант правильного ответа может быть как один, так и несколько.Ответы помечаются с помощью объекта CheckBox. Ну и снизу кнопочка Далее(которая опять же не активна, если не отмечены ответы на все вопросы) 3)Вылазит следующее окно, в котором отображается опять фамилия и кол-во набранных баллов. (баллы выводятся в процентах, либо по 10-бальной шкале) Вот, например, вопросы для первого теста (все берётся из листа Эксель, толком не знаю как присобачить туда их =( ) : 1.Объявление процедуры: а) Public Sub б) Public Function в) Public Property 2.Объявление переменной целого типа: а) Dim .. As Integer б) Dim .. As String в) Dim .. As Single 3.Объявление переменной вещественного типа: а) Dim .. As Boolen б) Dim .. As Double в) Dim .. As Currency 4.Вывод сообщения в окне с одной кнопкой: а) Dim i As Byte б) InputBox "сообщение" [, заголовок] [, умолчание] в) If <условие> Then г) MsgBox "сообщение" ,vbOKOnly, [, заголовок] 5.Ввести а равное 10: а) a = 10 б) Const a = 10 в) Dim a = 10 г) Rnd*10 6.Обращение к первому листу Excel к ячейкам A5 и B2: а) Worksheets(1).Range("B2") б) Worksheets(3).Range("A2") в) Worksheets(1).Range("A5") г) Worksheets(1).Range("B5") 7. Вычислить значение функции sin^4(x+4) (здесь походу должно быть введено нормальным образом (без этого знака ^)) а) y=sn4*(x+4) б) y=(sin(x+4))^4 в) y=sin(x+4)^4 8.Кнопки запуска программы: выполнение пошагово и полностью: а)F8 б)F2 в)F5 г)F12 Ну вот, допустим, 8 вопросов, только они обязательно с каждым новым запуском программы должны идти вразнобой, как и варианты ответов. Хелп плиз Последний раз редактировалось HellkilleR; 14.04.2010 в 22:47. Причина: Видоизменил правильные варианты ответов, что бы бросались в глаза |
14.04.2010, 22:46 | #2 | |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
Цитата:
Вот пример того, что вам нужно: http://festival.1september.ru/articles/210881/ И тут есть нечто подобное: http://www.planetaexcel.ru/forum.php?thread_id=9041 А здесь есть множество готовых решений... |
|
14.04.2010, 22:54 | #3 |
Форумчанин
Регистрация: 17.07.2009
Сообщений: 519
|
Слово "помоща" отсутствует в русском языке.
"Хотя бы" и "в принципе" пишутся раздельно. Начните освоение написания систем тестирования с русского языка. |
14.04.2010, 23:00 | #4 |
Регистрация: 28.03.2010
Сообщений: 7
|
Ну уж извините, если Вам не угодил, капитан Русский язык, писал в спешке. Люди, которые хотят помочь, на это внимания не обращают...
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Создание теста | Chaser | C++ Builder | 12 | 07.04.2010 22:14 |
Создание теста в Delphi | Arcanum | Фриланс | 15 | 22.02.2010 10:07 |
C++ структуры: создание теста. | Blondy | Общие вопросы C/C++ | 3 | 20.12.2009 23:02 |
Создание теста | VeraN | Помощь студентам | 0 | 23.11.2009 18:03 |
Создание мини теста на С | 11twin11 | Помощь студентам | 1 | 18.03.2009 11:26 |