VB中 如何复制Text1.text的字体到剪贴板? 如何剪切?

 我来答
Finding___
2009-01-01 · TA获得超过2万个赞
知道大有可为答主
回答量:7100
采纳率:0%
帮助的人:4393万
展开全部
'复制
Clipboard.Clear
Clipboard.SetText (Text1.SelText)

'剪切
Clipboard.Clear
Clipboard.SetText (Text1.SelText)
tmp = Text1.SelText
Text1.Text = Replace(Text1.Text, tmp, "")

'粘贴
tmp = Text2.SelText
tmp1 = Left(Text2.Text, Text2.SelStart)
tmp2 = Replace(Right(Text2.Text, Len(Text2.Text) - Text2.SelStart), tmp, "")
Text2.Text = tmp1 & Clipboard.GetText & tmp2
yrd241
2009-01-01 · TA获得超过339个赞
知道小有建树答主
回答量:139
采纳率:0%
帮助的人:144万
展开全部
你可以模拟一个剪贴板 啊 你可以在复制按钮的代码中写 cut=text1.text
text1.text=""
复制到另一个文本框就是text2.text=cut
ok!!
好了!!!
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
翰林院里扫地的
2009-01-01 · TA获得超过308个赞
知道小有建树答主
回答量:245
采纳率:0%
帮助的人:0
展开全部
Clipboard.Clear '清空剪贴板
Clipboard.SetText (Text1.Text) '复制到剪贴板
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
zhs490770
2009-01-01 · TA获得超过229个赞
知道小有建树答主
回答量:271
采纳率:0%
帮助的人:272万
展开全部
如何复制Text1.text的字体到剪贴板

是复制字符串还是字体啊???
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式