File encryption center - Help.vb

File encryption center / Help.vb

File encryption center - Help.vb

Help.vb

1. Public Class Help
2.     Dim MyName As String = My.Application.Info.AssemblyName.ToString
3.     Private Sub Help_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
4.         On Error Resume Next
5.  
6.         Me.MaximizeBox = False
7.         RTFTXT.Rtf = My.Resources.Help
8.     End Sub
9.     Private Sub CloseBTN_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CloseBTN.Click
10.         On Error Resume Next
11.         Me.Close()
12.     End Sub
13.     Private Sub RTFTXT_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles RTFTXT.KeyUp
14.         On Error Resume Next
15.         RTFTXT.Clear()
16.         RTFTXT.Rtf = My.Resources.Help
17.     End Sub
18. End Class