★★★敬请留意★★★：和微软一模一样的记事本的源代码（5）

Type Formstate Deleted As Integer Dirty As Integer Color As Long End Type Public Fstate

Option Explicit Private Sub CancelButton_Click() OKButton_Click Form1.Text1.SelText = Text2.Text E

Private Declare Function htmlhelp Lib _ "hhctrl.ocx" Alias "HtmlHelpA" _ (ByVal hwndCaller As Long

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wM

Public Sub Command1_Click() Dim FoundPos As Integer If Fstring = "" Then Fstring = Text1.Text El

记事本可谓小巧玲珑，体积小，占用内存小，当然还有容量小，正因为小，所以打开速度可是超快，与word等老牛拉车式的软件相比，使用记事本一定让你感受到是叫休憩速度。今天拿出来和大家分享的是关于记事本使

记事本可谓小巧玲珑，体积小，占用内存小，当然还有容量小，正因为小，所以打开速度可是超快，与word等老牛拉车式的软件相比，使用记事本一定让你感受到是叫休憩速度。今天拿出来和大家分享的是关于记事本使

可以替代系统记事本的程序 作者： 代码运行效果图如下： 本