1个回答
展开全部
Private Sub Command1_Click()
Text2.SelText = Text1.SelText
Text1.SelText = ""
End Sub
更多追问追答
追问
不行啊
追答
第一个文本框中要用鼠标选择文本,然后点击按钮,选择的文本就会移到第二个文本框了(这才是真正的“剪切”嘛)
如果是把第一个文本框的内容全部搬到第二个文本框,那就这样:
Private Sub Command1_Click()
Text2.Text = Text1.Text
Text1.Text = ""
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询