请大神们看看啊，。

刚学VB，

新建了一个txt1的文本框，三个command按键，分别命名为cmd1.cmd2.cmd3，复制，粘贴，清空，

我想在默认情况下cmd2，也就是粘贴enable为false，
只有当复制成功，也就是说当剪贴板有了东西，cmd2才可用，然后cmd3，清空，要清空剪贴板和txt1里面的内容，
请大神告诉下代码，怎么实现，谢谢

VB code

Private Sub cmd1_Click()
   VB.Clipboard.SetText Text1
   If VB.Clipboard.GetText <> "" Then _
      cmd2.Enabled = True
   
End Sub

Private Sub cmd2_Click()
  Text2 = VB.Clipboard.GetText
  
End Sub

Private Sub cmd3_Click()
   Text1 = ""
   VB.Clipboard.SetText ""
   cmd2.Enabled = False
   
End Sub

Private Sub Form_Load()
   cmd1.Caption = "复制"
   cmd2.Caption = "粘贴"
   cmd3.Caption = "清除"
   cmd2.Enabled = False
   
End Sub