Программа-тест

@umbarabah · Регистрация: 21.02.2011

Студворк — интернет-сервис помощи студентам

Доброго времени суток!
Кто может помочь с составлением программы для тестирования на VB? Вопросы есть, необходимо из 25 вопросов базы выбрать случайно 10 (естественно, не повторяясь), проверить их... Ну, и собственно, контроль- 11-25 верных- зачет, меньше 11- низачод=)...
Вообще хотелось бы иметь полную программу (за символическую плату, на пиво, так сказать), но сойдут и просто советы, как это сделать... В частности, как осуществить выбор вопросов. Заранее всем спасибо

@A_r_t_y · 05.06.2011, 16:33

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Module Module1
    Dim a(0 To 24) As Integer
    Dim b(0 To 9) As Integer
    Sub Main()
        For i = 0 To 24 Step 1
            a(i) = i
        Next
        Randomize()
        Dim l As Integer
        Dim c As Integer
        Dim v As Integer
        l = 25
        For i = 0 To 9 Step 1
            c = (Int(l * Rnd()))
            b(i) = a(c)
            v = a(l - 1)
            a(l - 1) = a(c)
            a(c) = v
            l = l - 1
        Next
    End Sub
End Module

Должен выбирать из 25 чисел 10 случайных. Вроде работает.

Новые блоги и статьи Все статьи Все блоги /
Программный отбор элементов справочника Номенклатура по группе 1С Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор под наименованию группы (на. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .	Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	Программный отбор элементов справочника Сотрудники по перечислениям 1С Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит предопределенное значение перечислений. Процедура. . .
Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .

@umbarabah 0 / 0 / 0 Регистрация: 21.02.2011 Сообщений: 16

	Программа-тест 05.06.2011, 12:43. Показов 2426. Ответов 1 Метки нет (Все метки) Доброго времени суток! Кто может помочь с составлением программы для тестирования на VB? Вопросы есть, необходимо из 25 вопросов базы выбрать случайно 10 (естественно, не повторяясь), проверить их... Ну, и собственно, контроль- 11-25 верных- зачет, меньше 11- низачод=)... Вообще хотелось бы иметь полную программу (за символическую плату, на пиво, так сказать), но сойдут и просто советы, как это сделать... В частности, как осуществить выбор вопросов. Заранее всем спасибо 0