Visual Basic標籤

Question

如果我在Visual Basic窗體中的標籤上有信息（例如名稱），如何將這些信息保存在.txt文件中？

感謝

Answer 1

可以在System.IO命名空間中的類。看看File及其方法。

本例使用的一個WriteAllText超載：

File.WriteAllText("Path To Text File.txt", myLabel.Text) 

它將寫入myLabel控制到指定的文本文件的文本值。

Answer 2

您可以將文件系統對象用於Visual Basic的早期版本。

'的VBScript

Dim fso, MyFile 
Set fso = CreateObject("Scripting.FileSystemObject") 
Set MyFile = fso.CreateTextFile("c:\testfile.txt", True) 
MyFile.WriteLine(label.caption) 
MyFile.Close 

http://msdn.microsoft.com/en-us/library/z9ty6h50(VS.85).aspx

或

Sub Create_File() 
    Dim fso, txtfile 
    Set fso = CreateObject("Scripting.FileSystemObject") 
    Set txtfile = fso.CreateTextFile("c:\testfile.txt", True) 
    txtfile.Write (lable.caption) ' Write a line. 
    ' Write a line with a newline character. 
    txtfile.WriteLine("Testing 1, 2, 3.") 
    ' Write three newline characters to the file. 
    txtfile.WriteBlankLines(3) 
    txtfile.Close 
End Sub 

http://msdn.microsoft.com/en-us/library/aa263346(VS.60).aspx

Answer 3

您使用的StreamWriter來做到這一點。這裏有一個例子：

Dim file As System.IO.StreamWriter 
file = My.Computer.FileSystem.OpenTextFileWriter("c:\test.txt", True) 
file.WriteLine("Here is the first string.") 
file.Close() 

如果你想知道如何從txt文件讀取，這裏有一個例子代碼：

Dim fileReader As String 
fileReader = My.Computer.FileSystem.ReadAllText("C:\test.txt") 
MsgBox(fileReader) 

Answer 4

直接把它放進你需要

Dim file As System.IO.StreamWriter 
file = My.Computer.FileSystem.OpenTextFileWriter("filename.txt", True) 
file.WriteLine("Your Text Here~") 
file.Close() 

的地方

Answer 5

FileOpen(1, Application.StartupPath & "\File.txt", OpenMode.Output) 
     WriteLine(1, Me.Label1.Text) 
FileClose()