扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
可以使用剪切板对象可以做到，他有个方法
成都创新互联公司主营唐山网站建设的网络公司,主营网站建设方案,重庆APP开发,唐山h5小程序设计搭建,唐山网站营销推广欢迎唐山等地区企业咨询
clipboard.gettext
他会返回剪切板上的文本数据，可以这样调用：
dim St as string
st=clipboard.gettext
在通过text.settext方法，或其他功能类似的方法就可以把剪切板上的数据复制到光标处了
需要用到文本框的属性：
SelectionStart
这个就是返回你当前光标所在文本框的位置，注意位置从0开始计算（就是光标在最左边，返回0）。
然后，需要用到Len()函数，获得文本框当前的字符数。
基本思路：
获得：光标所在位置，SelectionStart
把原来的字符，按照 SelectionStart 值，分成前后两部分，这样把：
前部分与S 与后部分连接起来，赋值给文本框。
代码如下：
TextBox1.Text = Microsoft.VisualBasic.Left(TextBox1.Text, TextBox1.SelectionStart) s Microsoft.VisualBasic.Right(TextBox1.Text, Len(TextBox1.Text) - TextBox1.SelectionStart)
第一步，点击VS工具
请点击输入图片描述
第二步，打开后，新建一个Windows窗体应用程序
请点击输入图片描述
第三步，新建完毕后，如图所示
请点击输入图片描述
第四步，拖动文本框与按钮，如图示
请点击输入图片描述
第五步，将剪贴板复制与粘贴代码输入，如图示
请点击输入图片描述
第六步，运行程序
请点击输入图片描述
7
第七步，点击按钮，成功从剪贴板中复制与粘贴操作
请点击输入图片描述
在窗体中拉两个listbox控件和一个Button控件，然后双击Button控件将如下代码复制到光标位置；
Dim a As String
a = ListBox1.SelectedItem
ListBox2.Items.Add(a)
用这个语句在VB中实现文本复制。
Clipboard.Clear
Clipboard.SetText "要复制的字符"
然后在任意能粘贴文本的地方都可以粘贴了。
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网