郭沫若《满江红》:vb 初级 提问:上机题

来源:百度文库 编辑:神马品牌网 时间:2024/05/03 04:25:49
新建一个工程,实现单击Command1将text1中的内容复制(或者剪切)到Text2中。(要求使用Clipboard对象)保存。
窗体上一个text文本框,两个command按钮,caption分别为“剪切”,“恢复”,运行后要求在text1中输入文本,点“剪切”,把text1中的内容剪切掉,点”恢复“,把text1中的内容恢复出来。提示:定义一个变量用来存放text1中的内容
虽然没有按题意去做 但我已经满意 我明白了怎么去用Clioboard了

Option Explicit
Dim temp As String
Private Sub CmdCopy_Click()
Clipboard.SetText Text1.Text
Text1.Text = ""
End Sub
Private Sub CmdPaste_Click()
Text1.Text = Clipboard.GetText
End Sub