快上网专注成都网站设计 成都网站制作 成都网站建设
成都网站建设公司服务热线:028-86922220

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb.net文本导入 vb导入文本框中的代码并执行

VB.net 怎样将richtextbox中带格式的文本和图片导入到word中?

别那么费事,

吕梁网站建设公司创新互联,吕梁网站设计制作,有大型网站制作公司丰富经验。已为吕梁超过千家提供企业网站建设服务。企业网站搭建\外贸网站制作要多少钱,请找那个售后服务好的吕梁做网站的公司定做!

直接用 richbox 的 save方法把内容存放在一个临时的 rtf文件

RichTextBox1.SaveFile("e:\temp.rtf") '因为word是可以直接打开rtf文件的

然后用 Documents打开这个临时对象

Documents.Open ("e:\temp.rtf")

最后再另存为 word文件

ActiveDocument.SaveAs ("newname.doc",100, False, "", True, "",False, False,False, False, False)

'注意第二个参数是100 表示doc格式

完整代码如下:

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim doc As Object, docword As Object

RichTextBox1.SaveFile("e:\1.rtf")

Doc = CreateObject("Word.Application")

DocWord = doc.Documents.Open("e:\1.rtf")

doc.ActiveDocument.SaveAs("newname.doc", 100, False, "", True, "", False, False, False, False, False)

doc.quit()

doc = Nothing

docword = Nothing

End Sub

如何将已有的txt格式的文件数据导入VB.NET程序中,(也就是在VB.NET中读取所需的txt文

一个按钮,一个文本框,把文本框设置成多行显示。

代码如下:

Imports System.IO

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim r As New StreamReader(Application.StartupPath "\ABC.txt", System.Text.Encoding.Default) '用StreamReader打开文本文件

Dim s As String

TextBox1.Text = ""

Do While r.Peek -1 '是否到文件尾

s = r.ReadLine '从打开的文件中读取一行内容

TextBox1.Text = TextBox1.Text s vbCrLf '添加到文本框TextBox1.Text的后面并回车

Loop

r.Close() '关闭对象

End Sub

End Class

VB.NET中怎么导入TXT文本里的数据

比如说用Richtext控件

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim file As String = "f:/x.txt"

RichTextBox1.LoadFile(file)

MsgBox("ok")

End Sub

VB.NET怎样实现导入导出文本文件

用System.IO.StreamReader类可以读各类文本文件,用System.IO.StreamWriter 类则可以写各类文本文件,从而实现导入导出文本文件功能。这两个类均支持各类编码格式(默认的是Unicode和UTF-8)。


当前名称:vb.net文本导入 vb导入文本框中的代码并执行
文章源于:http://6mz.cn/article/docdicc.html

其他资讯