简简单单做到【剪下 / 复制 / 贴上 / 复原】的功能

143、简简单单做到【剪下 / 复制 / 贴上 / 复原】的功能
在很多软件的编辑功能表中，都有提供【剪下 / 复制 / 贴上 / 复原】的功能，在 VB 中我们只要借用 Windows 的系统功能，很容易也可以有这样的功能，看看以下的程序码便能了解了！
Sub mnuEditText_Click (Index As Integer)
‘ 我们只要使用 SendKeys，其他的就让 Windows 去做吧！
Select Case Index
Case 0 ‘复原/UNDO
SendKeys "^Z" ‘Keys Ctrl+Z
Case 1 ‘剪下/CUT
SendKeys "^X" ‘Keys Ctrl+X
Case 2 ‘复制/COPY
SendKeys "^C" ‘Keys Ctrl+C
Case 3 ‘贴上/PASTE
SendKeys "^V" ‘Keys Ctrl+V
End Select
End Sub