VB，用当在第一个文本框里输入如下文字，并选中部分内容，然后单击复制按钮，便会自动复制到第二个文本框

VB，用当在第一个文本框里输入如下文字，并选中部分内容，然后单击复制按钮，便会自动复制到第二个文本框

图1：在第一个文本框中录入完文字并选中要复制的文字

图2：单击完复制按钮后的效果
如果单击清除按钮，则两个文本框里面的内容全部清空。
求代码！！！！！！！！！！！！！！！！！！！！！！！不要太复杂了

这是图一

举报该问题

其他回答

第1个回答 2014-10-09

Private Sub Command1_Click() '复制
Text2.SelText = Text1.SelText
End Sub

Private Sub Command2_Click() '清除
Text1.Text = ""
Text2.Text = ""
End Sub本回答被提问者采纳

相似回答

VB问题,要求单击按钮后就自动复制了文本内容?答：如果是想先用鼠标选择Text1的文本（可以部分，也可以全部），然后按Command1复制已选择的文本到剪贴板，则是：Private Sub Command1_Click()Clipboard.SetText Text1.SelText End Sub 如果是直接复制Text1的所有文本到剪贴板，则是：Private Sub Command1_Click()Clipboard.SetText Text1.Text End Sub...

VB 怎样在TEXTBOX中用按钮进行复制粘贴?答：Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TextBox1.Select()TextBox1.Copy() '复制textbox1中鼠标选中的内容'End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Bu...