VB.NET怎樣打開text文件并顯示到文本框里

文本框通常用來顯示文本字符，以下是用 VB 編寫的打開某 txt 文件，并把文件內(nèi)容顯示在文本框的步驟及代碼： 1、添加必要的組件（文本框、按鈕） 2、設(shè)置屬性： 3、編寫按鈕的響應(yīng)代碼：

成都創(chuàng)新互聯(lián)公司自2013年起，先為廣河等服務(wù)建站，廣河等地企業(yè)，進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為廣河企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問題。

VB.net 讀取文本文件

Imports?System.IO

Public?Class?Form1

Private?Sub?Form1_Load(sender?As?System.Object,?e?As?System.EventArgs)?Handles?MyBase.Load

Dim?sr?As?New?StreamReader("d:\test.csv")

Dim?arr1(),?arr2(),?arr3(),?arr4()?As?Integer

Dim?a1,?a2,?a3,?a4?As?New?ArrayList

Do?Until?sr.EndOfStream

Dim?str?As?String?=?sr.ReadLine

Dim?s()?As?String?=?str.Split(",")

a1.Add(Convert.ToInt32(s(0)))

a2.Add(Convert.ToInt32(s(1)))

a3.Add(Convert.ToInt32(s(2)))

a4.Add(Convert.ToInt32(s(3)))

ListBox1.Items.Add(s(0))

Loop

arr1?=?CType(a1.ToArray(GetType(Integer)),?Integer())

arr2?=?CType(a2.ToArray(GetType(Integer)),?Integer())

arr3?=?CType(a3.ToArray(GetType(Integer)),?Integer())

arr4?=?CType(a4.ToArray(GetType(Integer)),?Integer())

sr.Close()

End?Sub

End?Class

vb.net 2010 調(diào)用word程序 打開一個(gè)word文檔

1 使用Shell函數(shù)直接調(diào)用

語(yǔ)法：Shell (pathname[,windowstyle]).Pathname是指要執(zhí)行的程序的名字和任何必須的參數(shù)或命令行開關(guān)，可以包括目錄和驅(qū)動(dòng)器名；Windowstyle是執(zhí)行程序的窗口風(fēng)格的數(shù)字。

使用Shell調(diào)用Word比較簡(jiǎn)單，編程量小，但必須明確指定Word所在路徑，這不利于移植，而且，不能對(duì)Word進(jìn)行控制，不利于程序和Word之間的數(shù)據(jù)交換。

2 使用OLE自動(dòng)化控制Microsoft Word

2.1 使用方法

（1)Word為OLE自動(dòng)化提供一種稱為“Basic”的對(duì)象，要在VB中控制Word ,首先要定義一個(gè)引用Word中“Basic”對(duì)象的對(duì)象變量：Dim Wordobj as Object

(2)將Word 中的“Basic”對(duì)象賦給該對(duì)象：Set Wordobj=CreateObject("Word.Basic")

(3)可以使用大多數(shù)WordBasic語(yǔ)句和函數(shù)控制Word或Word文檔，使用方法和在Word宏中使用WordBasic指令的方法基本相同。

(4)關(guān)閉Word:Set Wordobj =Nothing。

注意：“Basic”對(duì)象不支持關(guān)閉它自己的一個(gè)方法。即若在OLE自動(dòng)化中關(guān)閉了Word，則對(duì)象被置為Nothing，便不能再對(duì)對(duì)象進(jìn)行操作，程序出錯(cuò)。

2.2 VB指令與WordBasic指令的差異

(1)有一些語(yǔ)句和函數(shù)不能使用，包括：控制結(jié)構(gòu)，如While…Wend和If…Then…Else；聲明語(yǔ)句，如Dim；定制對(duì)話框相關(guān)的語(yǔ)句：FileExit語(yǔ)句；要求數(shù)組變量作為參數(shù)的語(yǔ)句或函數(shù)。

(2)也有一些指令使用方法不同。①返回字符串以一個(gè)美元符（$）結(jié)束的WordBasic函數(shù)的關(guān)鍵字必須括在方括號(hào)中。例如，在WordBasic宏中的GetBookmark$()語(yǔ)句：mark$=GetBookmark$("Address")，若用VB調(diào)用，必須這樣寫mark$=Wordobj.[Ge-tBookmark$]("Address")。②選擇一個(gè)命令按鈕用“True”,不選擇用“False”

2.3 對(duì)OLE自動(dòng)化的說明

Word可以為OLE自動(dòng)化給另一個(gè)應(yīng)用提供對(duì)象，但是它不能使用OLE自動(dòng)化訪問其它應(yīng)用中的對(duì)象。例如：VB和Excel可以使用OLE自動(dòng)化訪問Word，但是Word不能使用OLE自動(dòng)化訪問它們。

3 在包容器中嵌入Word對(duì)象

在VB中，要訪問在包容器中嵌入的Word對(duì)象，首先要在項(xiàng)目中插入對(duì)象。做法如下：在窗體中插入OLE控件，對(duì)象類型選擇“MicrosoftWord圖片”或“Microsoft Word文檔”，再按“確定”。

然后用Object屬性訪問文檔或圖片，并使用WordBasic語(yǔ)句和函數(shù)作用于它。嵌入的對(duì)象必須在可被訪問之前被激活，可以使用Action屬性激活OLE控件。例如，使用下面指令訪問一個(gè)嵌入在稱為OLE1的OLE控件中的文檔：

Dim Wordobj as Object

OLE1.Action =7

Set Wordobj =OLE1.Object.Application. WordBasic

其他方面，使用方法同OLE自動(dòng)化。使用在包容器中嵌入的Word對(duì)象，Word顯示的窗口大小、位置與OLE控件定義的大小、位置相同，而且工具欄顯示位置與Word脫離。這一點(diǎn)與OLE自動(dòng)化相比，是個(gè)不足。

總之，要想在Microsoft Visual Basic中控制Microsoft Word，最好使用OLE自動(dòng)化，通過使用WordBasic指令對(duì)Word進(jìn)行全面控制，而且，用戶使用起來與使用Microsoft Word一樣，非常方便。

vb.net 如何打開txt文件？

說明：以下代碼在Microsoft Visual Basic 2005 （簡(jiǎn)體中文版）中通過。

創(chuàng)建新項(xiàng)目：

在窗體上添加文本框2個(gè)：TextBox1，TextBox2

TextBox1 -- 用來編輯要寫入的文本文件的內(nèi)容，或顯示打開的文本文件的內(nèi)容

TextBox2 -- 用來輸入要打開或要寫入的文件名（包括盤符，路徑）（例如：c:\123.txt）

在窗體上添加2個(gè)按鈕：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

補(bǔ)充:你要把讀出的數(shù)據(jù)賦值給一個(gè)變量,只要:聲明一個(gè)變量為數(shù)值類型,然后只要讀取一行就可以了,把這行數(shù)據(jù)經(jīng)過轉(zhuǎn)換成數(shù)值后賦給這個(gè)變量.

vb .net 程序怎么默認(rèn)打開txt記事本文件？

樓下的根本不對(duì)。exe右鍵是沒有“打開方式”的，也沒必要因?yàn)檫@個(gè)問題而還原系統(tǒng)。把exe設(shè)置為直接運(yùn)行，方法：新建一個(gè)txt文件，輸入ftype exefile="%1" %* ，保存，把擴(kuò)展名改為bat，雙擊這個(gè)文件，就好了。

VB.net 讀取文本文件？

1、實(shí)現(xiàn)上傳按鈕方法代碼。

2、判斷圖片對(duì)象是否為空代碼。

3、取得數(shù)據(jù)庫(kù)字段 dt.Rows(0)("Pic")方法代碼。

4、字節(jié)數(shù)組轉(zhuǎn)換為Image類型方法代碼。

5、處理SQL中操作Image類型方法代碼。

6、實(shí)現(xiàn)的上傳結(jié)果。