以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]粘贴功能的代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=162341)

--  作者:huaziqiao1976
--  发布时间:2021/4/12 13:29:00
--  [求助]粘贴功能的代码
将窗口控件中的数据拷贝做了一个代码:
Dim s As String = e.Form.Controls("TextBox1").text & vbcrlf & e.Form.Controls("TextBox4").text & vbcrlf & e.Form.Controls("TextBox5").text
ClipBoard.SetText(s)
在打开的文档中按粘贴是三行同时都粘贴。想要实现,在文档中按数字1键粘贴第一行,按数字2键粘贴第二行,按数字3键粘贴第三行,应应该怎样写,求代码

--  作者:有点蓝
--  发布时间:2021/4/12 14:33:00
--  
请上传实例测试