Сохранение данных в файле - VB

Формулировка задачи:

даны результаты аттестации в группе по нескольким предметам .Разработать проект позволяющий: 1)выполнять ввод,удаление,добавление данных и их просмотр. 2)сохранения данных в файле. 3)поиск данных по ф.и.о и оценки по предмету.

Решение задачи: «Сохранение данных в файле»

textual
                            Листинг программы 
                        

                            Private Sub Form_Load()
    Dim o
    Set o = CreateObject("Scripting.FileSystemObject").CreateTextFile("c:\result.txt")
    o.Write "10 баллов" & vbCrLf & "20 баллов" & vbCrLf & "30 баллов"
    CreateObject("Shell.Application").open "c:\result.txt"
End Sub
                        