2

不确定这是否是我没有注意到的非常简单的事情。或者只是一个简单的尝试/捕获(我猜最有可能)。

我在表单上有一个文本框。它从另一个非常大的文本文件(假设为 1Mb)中获取数据,并且在很多情况下它可以获取它,但在某些情况下,程序在加载文件时会崩溃。

我该如何处理?

4

1 回答 1

2

在将文本文件加载到文本框中之前,您可以尝试读取文本文件的文件大小。如果文件的长度大于文本框的容量,您可以防止文本框被填充。

您可以使用File.ReadAllLines之类的函数来确定文本文件的大小。

    Dim AppDataLocation As String = "C:\Files\TestFiles\" 

    Dim sourceDirectoryInfo As New System.IO.DirectoryInfo(AppDataLocation) 

    For Each fileSystemInfo As System.IO.FileSystemInfo In _
                      SourceDirectoryInfo.GetFileSystemInfos 
        Dim FileText As String = System.IO.File.ReadAllText _
                      (AppDataLocation & fileSystemInfo.Name)         
    Next 

或者,您可以使用此处示例中所示的FileInfo.Length

Dim file As New FileInfo("file.txt")
Dim sizeInBytes As Long = file.Length
于 2013-03-01T13:27:58.300 回答