读书人

请大神们看看啊该怎么处理

发布时间: 2012-01-22 22:38:43 作者: rapoo

请大神们看看啊,。
刚学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 SubPrivate Sub cmd2_Click()  Text2 = VB.Clipboard.GetText  End SubPrivate Sub cmd3_Click()   Text1 = ""   VB.Clipboard.SetText ""   cmd2.Enabled = False   End SubPrivate Sub Form_Load()   cmd1.Caption = "复制"   cmd2.Caption = "粘贴"   cmd3.Caption = "清除"   cmd2.Enabled = False   End Sub 

读书人网 >VB

热点推荐