vb6获取图片的文件大小

在VB6中，获取图片文件（例如`.jpg`, `.bmp`, `.png`等）的文件大小通常需要读取文件的基本属性。你可以使用`FileSystemObject`类来完成这个任务，下面是一个简单的示例：

Dim fso As FileSystemObject
Dim file As TextStream
Dim fileSize As Long

Set fso = New FileSystemObject
Set file = fso.OpenTextFile("C:\path\to\your\image.jpg", 1) ' 替换为实际图片路径

fileSize = file.Size ' 获取文件大小（单位通常是字节）
file.Close ' 关闭文件

MsgBox "文件大小: " & fileSize & " 字节" ' 显示文件大小

Set file = Nothing
Set fso = Nothing

在这个例子中，我们首先创建了一个`FileSystemObject`实例，然后打开文件并获取其`Size`属性，最后关闭文件流并显示文件大小。