Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Тест на бейсике / 17 сообщений из 17, страница 1 из 1
25.12.2011, 23:52
    #37592837
isx
isx
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
Вообщем цель у меня такого рода... Нужно сделать тест. Всего 100 вопросов. Каждый вопрос появляется после ответа на предыдущий и нажатия кнопки "Следующий". Так вот, как сделать сам процесс появления следующего вопроса в том же окне?
...
Рейтинг: 0 / 0
26.12.2011, 00:49
    #37592879
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
Стереть предыдущий текст и вывести туда следующий.

(насколько подробен вопрос - настолько подробен ответ)
...
Рейтинг: 0 / 0
26.12.2011, 01:02
    #37592886
isx
isx
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
Shocker.Pro,

Я тут немного определился...) К примеру мне надо чтоб текстбокс1 содержал вопрос №1... Делаем массив от 0 до 99, а далее как построить список вопросов, чтобы потом в зависимости от числа в массиве доставать нужный? Там в каждую строку надо писать вопрос и вызывать его по номеру строки или по другому?
...
Рейтинг: 0 / 0
26.12.2011, 01:18
    #37592895
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
isxЯ тут немного определилсяосталось это выразить в виде алгоритма
isxК примеру мне надо чтоб текстбокс1 содержал вопрос №1Text1.Text=Questions(1)
isxДелаем массив от 0 до 99массив, который будет содержать вопросы?
isxчтобы потом в зависимости от числа в массивеили это массив каких-то чисел? Каких?
isxТамГде?isxв каждую строкустроку чего? Массива? Текстбокса?
isxнадо писать вопросчто мешает?isxи вызывать его по номеру строкистроки чего? под строкой имеется ввиду элемент массива?isxили по другому?или по-другому
...
Рейтинг: 0 / 0
26.12.2011, 01:37
    #37592898
alex77755
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
авторВсего 100 вопросов. Каждый вопрос появляется после ответа
Следующим вопросом будет: я с этим уже разобрался. А как теперь быть в ответами. Как , собственно, узнать, ответ был правильным или нет?
...
Рейтинг: 0 / 0
26.12.2011, 02:40
    #37592920
isx
isx
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
Private Sub Form_Load()
q01 = "Какое наименование конституция РФ устанавливает для нашего Отечества?"
q02 = "Равнозначны ли по своему содержанию курсы *Конституционное право* и *Государственное право*?"
a01a = "Федерация народов России"
a01b = "Русская Федерация"
a01c = "Российская Федерация"
a01d = "Россия"
a02a = "Да"
a02b = "Нет"
'и так далее....
Text5 = q01
Text6 = a01a
Text7 = a01b
Text8 = a01c
Text9 = a01d
End Sub


Public Sub Command1_Click()
If Check1 = 1 Then
Text1 = "Неправильно"
Else
Text1 = "--"
End If
If Check2 = 1 Then
Text2 = "Неправильно"
Else
Text2 = "--"
End If
If Check3 = 1 Then
Text3 = "Верно"
Else
Text3 = "Неправильно"
End If
If Check4 = 1 Then
Text4 = "Верно"
Else
Text4 = "Неправильно"
End If
End Sub

Дописал наконец то.... Как теперь мне сделать, чтоб при нажатии БУТТОН2 все строки очищались и процесс начинался сначала?
...
Рейтинг: 0 / 0
26.12.2011, 04:03
    #37592928
isx
isx
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
И ещё.... Почему не работает этот алгоритм?
Private Sub Form_Load()
w2w = "sfdgsdfhg"
a = 2
e = "w" + LTrim(Str(a) + "w")
Text1 = e
End Sub

В текст1 должно выводится содержимое переменной ("sfdgsdfhg"), а вместо этого выводится она сама... Я впринципе понимаю почему так(типо переменная и строковый параметр не совпадают), но как исправить это не знаю....
...
Рейтинг: 0 / 0
26.12.2011, 05:11
    #37592935
alex77755
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
кавычки указыват, что это строка. Без кавычек бедет переменная
...
Рейтинг: 0 / 0
26.12.2011, 09:16
    #37592999
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
isxкак исправить это не знаю....Тебе потребуется функция Eval (или Evaluate) - но в VB её нет, придётся тащить из какой-либо библиотеки (VBS, Office, etc.)
...
Рейтинг: 0 / 0
26.12.2011, 10:34
    #37593093
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
AkinaТебе потребуется функция Eval (или Evaluate) - но в VB её нет, придётся тащить из какой-либо библиотеки (VBS, Office, etc.)но лучше переделать алгоритм, ибо этой функции в такой простой задаче ну нет совершенно никакой необходимости.

Почитал бы учебник для начала что ли... примеры приведенные там порешал
...
Рейтинг: 0 / 0
26.12.2011, 14:50
    #37593572
BelowZero
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
isx,

в вашем случае используется msflexgrid, чтобы не плодить переменные. сразу вам перейти на грид будет сложно, поэтому прикладываю проект с прогой. ехешник выложу в следующем посте
...
Рейтинг: 0 / 0
26.12.2011, 14:51
    #37593576
BelowZero
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
isx,
...
Рейтинг: 0 / 0
26.12.2011, 15:25
    #37593651
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
BelowZeroв вашем случае используется msflexgridв вашем случае msflexgrid используется исключительно беловым, который не знает, что такое массив и функция Array

В вашем случае ПО ХОРОШЕМУ используется база данных вопросов и ответов на основе аксессовского файла, ну или хотя бы текстового.
А так, в принципе, можно использовать пример белова, чтобы оттолкнуться от чего-то
...
Рейтинг: 0 / 0
26.12.2011, 15:56
    #37593710
BelowZero
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
Shocker.ProА так, в принципе, можно использовать пример белова, чтобы оттолкнуться от чего-то наивысшая возможная оценка работы, спасибо) msflexgrid - идеальная вещь, если вам нужно частое обращение к данным, удобная связь переменных и строк. меня только неприятно удивило то, что exe файл не запустился после компиляции в связи с отсутствием нужной ocx...
...
Рейтинг: 0 / 0
26.12.2011, 16:09
    #37593741
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
BelowZeromsflexgrid - идеальная вещь, если вам нужно частое обращение к даннымЕсли для забивания гвоздей ты освоил только микроскоп, это не значит, что он идеальная вещь для забивания гвоздей.
...
Рейтинг: 0 / 0
26.12.2011, 16:17
    #37593757
BelowZero
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
Shocker.ProBelowZeromsflexgrid - идеальная вещь, если вам нужно частое обращение к даннымЕсли для забивания гвоздей ты освоил только микроскоп, это не значит, что он идеальная вещь для забивания гвоздей. забьём гвоздь супермеганитро молотком и обычным микроскопом. гвоздь забился. "а если нет разницы, зачем платить больше?" (с) реклама Доси
...
Рейтинг: 0 / 0
26.12.2011, 17:26
    #37593924
TpaBka
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тест на бейсике
BelowZeroа если нет разницы, зачем платить больше?" (с) реклама Доси
BelowZeroменя только неприятно удивило то, что exe файл не запустился после компиляции в связи с отсутствием нужной ocx...
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Тест на бейсике / 17 сообщений из 17, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]