コピーペーストするには？

---

Windows2000sp3でVisualbasic6.0sp5の環境でやってるのですが

Private Sub Command1_Click()
    Clipboard.SetText Me.Text1.Text
    Me.Text2.Text = Clipboard.GetText
End Sub

この方法ではマウスの右クリックしてコピーしたみたいに
メモ帳やその他のところにはペースト出来ないので
誰かやり方を知っている方教えてください。

---

SetTextする前にClearしてみるとか。

---

ほかにも可能性が考えられると思いますけど…。
  クリップボードにテキストをセットしてから、貼り付けるまでの間隔が短すぎるのではないかということ。
まだ、クリップボードにデータがいっていないのかもしれないので、
その場合は分割するか、からループをはさんだりする必要があります。

  というより、クリップボードにコピーする処理はともかく、
そのあと、テキストをText1からText2にコピーするだけでいいような気がしますが…。

---

コピーする部分をSelTextで選択状態にしてSendKeysでCtrl+Cを送るとか

---

もしかして選択された選択範囲だけをコピーしたいのでしょうか？

Clipboard.SetText Me.Text1.Text

これだとテキストボックスの内容がまるごとはいるので
その選択状態のものを指定しないと・・

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。

※作成する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。