重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
VB点虐 复制Word文档内容?建议可以参考下spire.doc for 点虐 的教程文章:
创新互联建站坚持“要么做到,要么别承诺”的工作理念,服务领域包括:网站设计、做网站、企业官网、英文网站、手机端网站、网站推广等服务,满足客户于互联网时代的侯马网站设计、移动媒体设计的需求,帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴!
C#/VB.NET 复制 Word 文档(这个文章描述的是复制word正文内容)
C#/VB.NET 复制 Word 页眉/页脚(复制Word页眉页脚)
复制水印:
Imports Spire.Doc
Namespace CopyWatermark_Doc
Class Program
Private Shared Sub Main(args As String())
'加载文档1
Dim doc1 As New Document()
doc1.LoadFromFile("input.docx")
'加载文档2
Dim doc2 As New Document()
doc2.LoadFromFile("target.docx")
'获取文档1的水印效果,设置到文档2
doc2.Watermark = doc1.Watermark
'保存文档2
doc2.SaveToFile("CopyWatermark.docx", FileFormat.Docx2013)
System.Diagnostics.Process.Start("CopyWatermark.docx")
End Sub
End Class
End Namespace
这代码里面的路径是以将型模结祥族果文档谨租弊保存在项目文件下,也可以自己自定义路径
你的含春迅目的其实不是要实现"复制"这个过程, 而是想逐行取得每行的谈此数据吧?
如果是这样, 可以用这个办法:
strline = RichTextBox1.lines(lineno)
lineno 是行号, 从0开始森慎.
每按一次按钮, 取到第lineno的值RichTextBox1.lines(lineno), 然后让lineno加1就可以了.
例如,把文件"E:\新凯散建文腊中件夹\a.txt"复制到剪贴板
CreateObject("Shell.Application").NameSpace("E:\新建文件夹"轮孙山).ParseName("a.txt").InvokeVerb "复制(C)"