帮我把这段转成VB.net

这段代码如果需要转换为VB.NET，将会看起来类似这样：

If e.PixelFormat = PixelFormat.Format8bppIndexed Then
    Me.Invoke(Sub() ' 使用Delegate来创建匿名方法
        Dim time1 As New Stopwatch()
        time1.Start()

        ' pictureBox1.Image = e.ToBitmap()
        Dim image8Grey2 As New CogImage8Grey(e.ToBitmap())

        cogRecordDisplay1.Image = image8Grey2

        time1.Stop()
        Label2.Text = "耗时：" & time1.ElapsedMilliseconds
        ListBox1.Items.Add("扫描完成，获得图像")
        Label1.Text = "采集数量：" & imgCount + 1
        Label5.Text = "图像大小：" & e.Width & ", " & e.Buffers.Length \ e.Width
    End Sub)
End If

这里的主要变化包括语法调整（如括号使用、关键字等）、修改了`Me.Invoke`（因为VB.NET中使用`Me`而不是`.BeginInvoke`来引用控件），并使用了`&`运算符连接字符串。此外，VB.NET更倾向于使用`+`来表示整型数值的累加，所以`imgCount++`变成了`imgCount + 1`。