包含vb.net打开文件流的词条

vb.net如何调用打开外部excel文档

第一步，新建项目。

麻江网站制作公司哪家好，找创新互联建站！从网页设计、网站建设、微信开发、APP开发、成都响应式网站建设公司等网站项目制作，到程序开发，运营维护。创新互联建站2013年开创至今到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选创新互联建站。

1

打开vb.net，也就是打开Microsoft visual studio 2010，第一次使用的时候设置为basic语言就行。新建项目--打开excel。

2

新建成功。

END

第二步，添加引用。

1

“项目”--“添加引用”。

2

添加Microsoft Excel 14.0 Object Library。

END

第三步，添加打开文件对话框工具。

1

工具箱--对话框--openfiledialog。

2

添加成功。

END

第四步，添加命令按钮控件。

1

工具箱--公共控件--button。

在控件上右击鼠标，进入属性设置。

2

text属性设置为“打开excel”。

3

name属性也设置为“打开excel”。

END

第五步，编写程序。

1

鼠标双击命令按钮，进入编程界面，编写程序。

END

第六步，运行程序。

1

鼠标单击启动调式图标，程序开始运行。

2

单击打开excel命令按钮，调用打开文件对话框，选择自己要打开的excel文件。

END

第七步，保存程序。

第一次程序运行完，关闭程序，出现关闭项目提示，选择保存。

2

选好自己要保存的位置。

vb.net读取文件流

dim filename as string = "文件名" Using myfilestream As New FileStream(FileName, FileMode.Open, FileAccess.Read)

Dim data() As Byte

ReDim data(myfilestream.Length - 1)

myfilestream.Read(data, 0, myfilestream.Length)

myfilestream.Close()

' data是你要的结果，为byte()， End Using

如何用vb.net 打开一个既存的txt文档。

可以调用CMD

方法一：

Shell("cmd.exe /c call c:\新建文本文档.txt", AppWinStyle.NormalFocus)

缺点：不但会打开文本文件，同时还会显示一个cmd窗体。

方法二：

需要新建一个bat文件到资源里，输入start C:\新建文本文档.txt

代码

shell "bat文件的路径.bat"

这样就好了，两种方法各有好坏。一个会显示cmd窗体，一个需要bat文件。

vb.net 如何打开txt文件？

说明：以下代码在Microsoft Visual Basic 2005 （简体中文版）中通过。

创建新项目：

在窗体上添加文本框2个：TextBox1，TextBox2

TextBox1 -- 用来编辑要写入的文本文件的内容，或显示打开的文本文件的内容

TextBox2 -- 用来输入要打开或要写入的文件名（包括盘符，路径）（例如：c:\123.txt）

在窗体上添加2个按钮：Button1，Button2

Button1 -- 写入文件

Button2 -- 打开文件

代码如下：

Imports System.IO

Public Class Form1

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

Dim w As New StreamWriter(TextBox2.Text)

w.Write(TextBox1.Text)

w.Close()

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim r As New StreamReader(TextBox2.Text)

Dim s As String

TextBox1.Text = ""

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

s = r.ReadLine

' MessageBox.Show(r.Peek)

TextBox1.Text = TextBox1.Text s vbCrLf

Loop

r.Close()

End Sub

End Class

补充:你要把读出的数据赋值给一个变量,只要:声明一个变量为数值类型,然后只要读取一行就可以了,把这行数据经过转换成数值后赋给这个变量.

vb.net使用打开对话框,打开一个文本文件显示在文本框中,然后对文本框中的信息进行编辑后

读文件内容到TextBox :

Try

Using sr As StreamReader = New StreamReader("C:\\TestFile.txt")

textbox1.Text = sr.ReadToEnd()

End Using

Catch E As Exception

Console.WriteLine(E.Message)

End Try

修改完成后,保存到文件:

Using sw As StreamWriter = New StreamWriter("C:\\TestFile.txt")

sw.Write(textbox1.Text)

sw.Close()

End Using

其中,流构造的参数

New StreamReader("C:\\TestFile.txt")

New StreamWriter("C:\\TestFile.txt")

中的"C:\\TestFile.txt"可以用OpenFileDialog和SaveFileDialog的FileName属性替换.

Dim openFileDialog1 As New OpenFileDialog()

openFileDialog1.InitialDirectory = "c:\"

openFileDialog1.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"

openFileDialog1.FilterIndex = 2

openFileDialog1.RestoreDirectory = True

If openFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then

Try

Using sr As StreamReader = New StreamReader(openFileDialog1.FileName)

textbox1.Text = sr.ReadToEnd()

End Using

Catch E As Exception

Console.WriteLine(E.Message)

End Try

End If

保存的时候换成SaveFileDialog就好

vb.net中怎样在菜单栏点打开文件来打开D盘中一个txt文件

import System.IO

用文件流读

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

Dim open As New OpenFileDialog

open.Filter = "テキスト ファイル (*.txt)|*.txt" _

"|すべてのファイル (*.*)|*.*"

If open.ShowDialog = Windows.Forms.DialogResult.OK Then

TextBox1.Text = open.FileName

Dim file As New FileStream(open.FileName, FileMode.Open, FileAccess.Read)

Dim encoding As Encoding = encoding.GetEncoding(Util.ToString(Me.ComboBox1.SelectedItem))

Dim stream As New StreamReader(file, encoding)

Dim strB As New StringBuilder

While (Not stream.EndOfStream)

strB.AppendLine(stream.ReadLine)

End While

Me.RichTextBox1.Text = strB.ToString

stream.Close()

End If

End Sub