VB程序员博客
这里有一段代码：
Dim DataFile As Integer, Chunks As Integer
Dim F1 As Long, F11 As Long, F2 As Long, F22 As Long
Dim F3 As Long, F33 As Long, F4 As Long, F44 As Long
Dim Fragment As Integer, Chunk() As Byte, I As Integer
Const ChunkSize As Integer = 16384 '(16K Chunk Size)
Const LongValue As Long = 2147483647
Function Auto_Load(CommDial As CommonDialog, FX As Long, FXX As Long, Column As Field, ImageBox As Image)
'—–> Determine Size of Picture 1
FX = Column.ActualSize
If FX > 0 Then
'—–> Set DataFile to Long Binary
DataFile = 1
Open "pictemp" For Binary Access Write As DataFile
'—–> Grab Picture In Pieces to Avoid Buffer Overflow
Chunks = FX ChunkSize
Fragment = FX Mod ChunkSize
ReDim Chunk(Fragment)
Chunk() = Column.GetChunk(0, Fragment)
FXX = Fragment
Put DataFile, , Chunk()
For I = 1 To Chunks
ReDim Buffer(ChunkSize)
Chunk() = Column.GetChunk(FXX, ChunkSize)
Put DataFile, , Chunk()
FXX = FXX + ChunkSize
Next I
'—–> Display Picture
Close DataFile
CommDial.FileName = "pictemp"
ImageBox.Picture = LoadPicture(CommDial.FileName)
End If
End Function
对于代码理解存在很多不解，谁能讲下代码里图像处理的大概过程和机制？谢谢！哪句代码不理解?没有看到图像处理的代码。
就是加载内存中的图片吧。恩 就是加载图片 我是新手 也没处理过图片格式的东西
Chunk() = Column.GetChunk(0, Fragment)这一句是什么意思，这两个参数是什么含义，我查MSDN只看到一个参数。有人能讲下吗我自己解决了
Column.GetChunk(0, Fragment)里去掉0，保留一个参数就可以了。这估计是以前的一些写法。