VB实验题。大神们，帮帮忙吧，谢谢。

输入学生的学号，姓名和4门功课的成绩，计算每个学生的总分和平均分。(用自定义数据类型，sub过程调用实现添加、查询和排序。)
Private Type Student
num As String
name As String
mark(1 To 4) As Single
total As Single
aver As Single
End Type
程序功能要求
添加：输入一个学生成绩后，求出该生的总分和平均分。单击一次输入一个学生信息。
查询：输入需要查询的学生姓名后，将查询到的学生信息显示在各文本框中，没有查询到用输出对话框给出提示信息。
排序：按总分或平均分高低输出学生成绩表。输出在另一个窗口中。

急求急求急求 谢谢！