如何避免在vb .net中以固定间隔创建新图像时label.image的图像重叠

Imports System.Drawing

Public Class Form1
    Private WithEvents timer As New Timer()
    Private images As New List(Of Bitmap)()

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        timer.Interval = 1000 ' 设置定时器间隔为1秒
        timer.Start() ' 启动定时器
    End Sub

    Private Sub Timer_Tick(sender As Object, e As EventArgs) Handles timer.Tick
        ' 检查Label控件的大小是否足够容纳新图像
        If label1.Width >= desiredImageWidth AndAlso label1.Height >= desiredImageHeight Then
            ' 清除之前的图像
            label1.Image = Nothing

            ' 创建新图像
            Dim newImage As New Bitmap(desiredImageWidth, desiredImageHeight)
            Using g As Graphics = Graphics.FromImage(newImage)
                ' 在新图像上绘制内容
                ' ...

                ' 将新图像绘制在Label上
                label1.Image = newImage
            End Using

            ' 保存新图像
            images.Add(newImage)
        End If
    End Sub

    ' 其他代码...

    ' 以下是一些相关的腾讯云产品和链接，供参考：
    ' - 腾讯云对象存储（COS）：https://cloud.tencent.com/product/cos
    ' - 腾讯云云服务器（CVM）：https://cloud.tencent.com/product/cvm
    ' - 腾讯云人工智能（AI）：https://cloud.tencent.com/product/ai
    ' - 腾讯云物联网（IoT）：https://cloud.tencent.com/product/iotexplorer
    ' - 腾讯云区块链（BCS）：https://cloud.tencent.com/product/bcs
    ' - 腾讯云元宇宙（Metaverse）：https://cloud.tencent.com/product/metaverse
End Class