Как сделать адресную книгу? vb.net

[Timon779]

Нужно, чтобы программа загружала информацию(которая находится в зашифрованном виде) из текстового файла, допустим 4 столбца. Строки должны добавляться, поскольку должна быть возможность добавлять новые контакты. Попробовал использовать DataGridView1 с ключом шифрования Rijndael, но так же как в RichTextBox этот метод расшифровки и загрузки текста не хочет работать. Вот код:

Private Sub ДобавитьВАдреснуюКнигуToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ДобавитьВАдреснуюКнигуToolStripMenuItem.Click
        Try
            With OpenFileDialog1
                .CheckFileExists = True
                .CheckPathExists = True
                .DefaultExt = "txt"
                .DereferenceLinks = True
                .Filter = _
                "Текстовые файлы (*.txt)|*.txt|Все файлы|*.*"
                .Multiselect = False
                .RestoreDirectory = True
                .ShowHelp = False
                .ShowReadOnly = False
                .Title = "Выберите файл"
                .FileName = "Обычный файл"
                .ValidateNames = True

                If .ShowDialog = Windows.Forms.DialogResult.OK Then
                    Try
                        DataGridView1.Text = Rijndael.Decrypt(.FileName)
                    Catch fileException As Exception
                        Throw fileException
                    End Try
                    F_Name2()
                    Me.Text = "Расшифровка и кодирование - " & fname
                End If
            End With
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Exclamation, Me.Text)
        End Try
    End Sub