Public Class frmTexteditor
    Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
        Me.DialogResult = DialogResult.OK
        Me.Close()
    End Sub

    Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click
        Me.DialogResult = DialogResult.Abort
    End Sub

    Private Sub frmTexteditor_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub
End Class