记事本大体框架已做好，但是还有很多不会！

问题：

1、文件里面除了退出我自己可以设置外，其余现在均不会。我想应该用一个什么命令，比如复制， clipboard.settext txtnotepad.seltext
2、撤销命令也存在一样的问题；
3、复制剪切以及粘贴等命令
(1)  if  txtnotepad.seltext<>""  then
           menucopy.enabled=true
           menupaste.enabled=true
           ............
      else
           menucopy.enabled=false
            ........
      end if
 我想这样设计，但是有不知道把这些代码放在什么地方？还是我的方法本来不对？

多谢各位指教！！

上面的问题我解决了。原来是使用文本框的change事件

双击文本框
输入下面的代码就可以了：
Private Sub txtfirst_Change()
If txtfirst.Text = "" Then
    menucopy.enabled=false
    menupaste.enabled=false
   ...............
Else
    menucopy.enabled=true
    menupaste.enabled=true
           ............
End If
End Sub

'菜单有效性的设置