更新Picturebox图片

时间:2015-09-28 16:51:48

标签: vb.net picturebox

我使用图片框作为预览'屏幕上的另一个winform的webbrowser控件。除了更新图片框控件之外,它的效果很好我发现代码需要运行两次(双击按钮)链接到下面的代码。任何想法为什么图片框在第一遍中没有更新以显示新导航的页面?

Private Sub mOutput_Click(sender As Object, e As EventArgs) Handles mOutput.Click


    If Not mFiles.SelectedItem Is Nothing Then

        Formloading.fDisplay.WebBrowser1.Navigate(folderloc.ToString & "\" & mFiles.SelectedItem.ToString)

    End If

    Dim Bounds As System.Drawing.Rectangle
    Dim outputscreen As System.Drawing.Bitmap
    Dim graph As System.Drawing.Graphics
    Dim LO As Integer = 0

    With Bounds
        .Height = fDisplay.WebBrowser1.Height
        .Width = fDisplay.WebBrowser1.Width
        .X = Formloading.fDisplay.Location.X
        .Y = Formloading.fDisplay.Location.Y
        .Size = Formloading.fDisplay.Size

    End With
    outputscreen = New System.Drawing.Bitmap(Bounds.Width, Bounds.Height, System.Drawing.Imaging.PixelFormat.Format32bppRgb)
    graph = System.Drawing.Graphics.FromImage(outputscreen)
    graph.CopyFromScreen(Bounds.X, Bounds.Y, 0, 0, Bounds.Size, Drawing.CopyPixelOperation.SourceCopy)
    PictureBox1.Image = outputscreen


End Sub

0 个答案:

没有答案