Рекомендации по курсовой...

[sufffa]

Вот пришла пора курсовой...
Посоветуйте плиз элементы к-е рациональней использовать в ней

Задание вот такое
Есть группа из M студентов
За сессию каждый студент имеет по N дисциплинам K оценок
Получить ведомость успеваемости(фамилии сортированы по алфавиту)
Найти средний балл по каждой диссциплине и кол-во отличных оценок по каждой дисциплине.

[Ennor]

...
Есть группа из M студентов
...

Ага, множества! Добро пожаловать в наш клуб

[Sirik]

не обязательно использовать базы данных, можно через классы и колекции

[Faust]

Хм... Кажись параметры M, N, K известны перед началом работы. Так что через массивы сподручнее всего будет! Выделяешь в памяти кусок M*N*K байт под хранение оценок. Используется минимальное количество памяти, достигаеться максимальное быстродействие. К примеру,

Найти средний балл по каждой диссциплине и кол-во отличных оценок по каждой дисциплине.

достигаеться так:

Код: Выделить всё

Dim Marks(0 to m*n*k-1) As Byte ' массив оценок
Dim Names(0 to m-1) As String ' ФИО студентов
Dim Subjects(0 to n-1) As String ' названия предметов
Dim i As Long, im As Integer, in As Byte, ik As Byte
Dim s As Integer, o As Byte
i=0
For im = 0 to m-1
For in = 0 to n-1
s=0
o=0
For ik = 0 to k-1
s=s+Marks(i)
If Marks(i)=5 then o=o+1
i=i+1
Next ik
Debug.Print "Студент " & Names(im) & " , дисциплина " & Subjects(in) & ": средний балл - ", CStr(Csng(s)/k), " ; количество отличных оценок - " & CStr(o)
Next in
Next im

[Sirik]

по-моему юзер хочет не совета, а именно сам код курсовой

[sufffa]

по-моему юзер хочет не совета, а именно сам код курсовой

Да не...только те элементы к-е нужно использовать

[sufffa]

Забыли про элементы чтоли?

[Faust]

А что ты понимаеешь под словом "элементы"? Контролы, через которые реализуеться UI? Куски кода? Организацию данных в памяти я тебе описал.

[sufffa]

Объекты тобиш
Была идея через MSHFlexGrid сделать но она не реализовалась