VB6 粘贴按钮
点击Command1复制Text1内容点击Command2粘贴已复制的内容到Text1VB6.0...
点击Command1 复制Text1内容点击Command2 粘贴已复制的内容到Text1VB6.0
展开
1个回答
2013-06-30
展开全部
Private Sub Command1_Click()
Clipboard.Clear
Clipboard.SetText (Text1)
End SubPrivate Sub Command2_Click()
Text1 = Clipboard.GetText
End Sub
Clipboard.Clear
Clipboard.SetText (Text1)
End SubPrivate Sub Command2_Click()
Text1 = Clipboard.GetText
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询