Vb詞典刪除

樓上，只保留第壹個文本框中選中的字符，其余字符顯示在第二個文本框中。

這將刪除第壹個文本框中選定的字符，並在第二個文本框中顯示剩余的字符。

私有子命令1_Click()

Text1。Text =替換(Text1。文本，Mid(Text1。文本，Text1。SelStart + 1，Text1。SelLength)，"")

文本2。Text = Len(Text1。正文)

末端接頭

這是第壹個文本框中的內容保持不變，而第二個文本框顯示刪除選定字符後剩余的字符串。

私有子命令1_Click()

文本2。Text = Left(Text1。文本，Text1。SelStart)和amp右(Text1。Text，Len(Text1。Text) - Text1。SelStart - Text1。SelLength)

末端接頭

我不知道妳想要哪壹個。