十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
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
例如,把文件"E:\新凯散建文腊中件夹\a.txt"复制到剪贴板
CreateObject("Shell.Application").NameSpace("E:\新建文件夹"轮孙山).ParseName("a.txt").InvokeVerb "复制(C)"
复制文件夹不用剪贴板,使用系统文件操作对象桥码就好了
CreateObject("scripting.filesystemobject").copyfolder "c:\歼液Program Files"敏改哪, "D:\Program Files"
Clipboard.SetText()是方法,必须给它传递参数才能将内容保存在剪切板上。
Clipboard.SetText(TextBox1.Text);
SelectedText是只读属性,只能读取文本框内选定的内容,而不能对其赋值仔笑腔。
Clipboard.GetText()用于获得剪切板内的内容。如念衫:升蔽
TextBox2.Text=Clipboard.GetText();