使用 VB.NET 创建一个新的 txt 文件答案

【问题标题】：Create a new txt file using VB.NET使用 VB.NET 创建一个新的 txt 文件
【发布时间】：2019-10-18 17:54:38
【问题描述】：

如何使用 VB.NET 在C:\my files\2010 位置创建一个空的.txt 文件？

【问题讨论】：

这段代码真的很有用。谢谢---RRPV

标签： vb.net

【解决方案1】：

这里有一行将创建（或overwrite）文件：

File.Create("C:\my files\2010\SomeFileName.txt").Dispose()

注意：调用 Dispose() 可确保关闭对文件的引用。

【讨论】：

是的，当我使用示例时，我是新手，我提示错误 Name 'File' is not declared 我知道如何声明字符串 bat not name？
@Schenz：我知道，哈哈，这就是我放入样本的原因。我从很久以前就想象过自己：“文件名到底是从哪里来的？”
@sam：你需要导入File，像这样：Imports System（换行）Imports System.IO
将 Imports System.IO 添加到类的顶部，或将示例更改为 System.IO.File.Create("C:\my files\2010\SomeFileName.txt").Dispose()
感谢.Dispose()。

【解决方案2】：

您可能还想检查文件是否已经存在以避免意外替换文件（除非这是当然的想法：

Dim filepath as String = "C:\my files\2010\SomeFileName.txt"
If Not System.IO.File.Exists(filepath) Then
   System.IO.File.Create(filepath).Dispose()
End If

【讨论】：

非常感谢您。我能够创建文件，但它会被锁定。你的代码帮助我克服了困难。谢谢杰弗里。韦恩

【解决方案3】：

您可以尝试写入 Documents 文件夹。这是我为项目调试需求所做的“调试”功能：

Private Sub writeDebug(ByVal x As String)
    Dim path As String = System.Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
    Dim FILE_NAME As String = path & "\mydebug.txt"
    MsgBox(FILE_NAME)
    If System.IO.File.Exists(FILE_NAME) = False Then
        System.IO.File.Create(FILE_NAME).Dispose()
    End If
    Dim objWriter As New System.IO.StreamWriter(FILE_NAME, True)
    objWriter.WriteLine(x)
    objWriter.Close()
End Sub

您可以通过“SpecialFolder”对象访问更多标准文件夹。

【讨论】：

【解决方案4】：

你可以用这个

FileOpen(1, "C:\my files\2010\SomeFileName.txt", OpenMode.Output)
FileClose(1)

这会打开文件替换其中的任何内容并关闭文件。

【讨论】：

【解决方案5】：

open C:\myfile.txt for append as #1
write #1, text1.text, text2.text
close()

这是我在Visual Basic 6.0 中使用的代码。它可以帮助我在驱动器上创建一个 txt 文件，将两条数据写入其中，然后关闭文件...试试看...

【讨论】：