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://hbruida.cn/article/docdicc.html