Creating an UNDO for a small NotePad???

[rino_2]

Hi,

I would like to create an UNDO for my small NotePad. I have created an UNDO already but sometimes for some reason when I press UNDO the Text compleatly vanishes. I would like to see an Example please.

Thanks

I think there's an example on here. Try
downloading it.

[Aaron Young]

Simple Undo..

Private Sub Command1_Click()
Text1.SetFocus
SendKeys "^Z", 1
End Sub



------------------
Aaron Young
Analyst Programmer
aarony@redwingsoftware.com
adyoung@win.bright.net