vb 创建一个超大文件,任意文件内容
来源:百度知道 编辑:UC知道 时间:2024/05/23 13:46:47
创建一个40G或更大的文件,写向E盘,
文件名任意如1.txt
任意内容
文件名任意如1.txt
任意内容
楼上的,你测试了么?可以放那么多9吗?有些事情是不可以想当然的
经测试,最大只能生成4.09G的单个文件,主要是因为程序打开超过这个大小的文件就会出错。你要生成40G的文件可以通过生成多个文件来实现,比如这里可以生成10个这样的文件
'添加窗体Form1,按钮Command1,复制如下代码:
Private Sub Command1_Click()
Call createFiles(10) '创建10个大小约为4G的文件
MsgBox "创建完成!"
End
End Sub
Private Sub createFiles(intFileCount As Integer)
Dim i, j, fileNumber As Integer
Dim s As String
s = Space(200000000)
For i = 1 To intFileCount
For j = 1 To 22
DoEvents
&nb