从品牌网站建设到网络营销策划,从策略到执行的一站式服务
例如,把文件"E:\新建文件夹\a.txt"复制到剪贴板
创新互联建站专业为企业提供东港网站建设、东港做网站、东港网站设计、东港网站制作等企业网站建设、网页设计与制作、东港企业网站模板建站服务,十多年东港做网站经验,不只是建网站,更提供有价值的思路和整体网络服务。
CreateObject("Shell.Application").NameSpace("E:\新建文件夹").ParseName("a.txt").InvokeVerb "复制(C)"
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim my_text() As String
my_text = RichTextBox1.Lines
System.Array.Reverse(my_text)
ReDim Preserve my_text(my_text.GetUpperBound(0) - 3)
System.Array.Reverse(my_text)
RichTextBox1.Lines = my_text
End Sub
复制文件夹不用剪贴板,使用系统文件操作对象就好了
CreateObject("scripting.filesystemobject").copyfolder "c:\Program Files", "D:\Program Files"
Clipboard.SetText()是方法,必须给它传递参数才能将内容保存在剪切板上。
Clipboard.SetText(TextBox1.Text);
SelectedText是只读属性,只能读取文本框内选定的内容,而不能对其赋值。
Clipboard.GetText()用于获得剪切板内的内容。如:
TextBox2.Text=Clipboard.GetText();
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图