我有一个简单的代码,似乎会导致内存泄漏:
Public Function NewAlphaBitmap(ByVal uWidth As Integer, ByVal uHeight As Integer) As Bitmap
Return New Bitmap(uWidth, uHeight, System.Drawing.Imaging.PixelFormat.Format32bppArgb)
End Function
经过几次循环...
Dim nBmp As Bitmap
For i As Integer = 0 To 1000
nBmp = NewAlphaBitmap(5000, 5000)
Next
...我收到内存不足的错误。
根据我的理解,当我使用NewAlphaBitmap将nBmp设置为新的Bitmap时,应该会自动处理nBmp,因此不应该是内存泄漏。
但看起来并非如此。
这可能是什么问题?
编辑:
当我执行以下操作时,内存泄漏甚至会持续存在:
For i As Integer = 0 To 1000
nBmp = NewAlphaBitmap(5000, 5000)
nBmp = Nothing
Next